[R-br] Fit não linear com função que aprensenta singularidades.

[Mauro Sznelwar]

Eu não consegui achar esta biblioteca manipulate. eu tenho o Windows7, por acaso é exclusiva do Linux, ou ainda não está oficializada?

Oi Fernando, 

Ele nem desenha a curva em cima do gráfico. Isso indica então que não tem parâmetros que façam com que a função se ajuste, né?
Engraçado porque meu orientador conseguiu fazer o fit usando esta função. 
Aqui está como eu plotei mas a curva em azul nem apareceu sobre o gráfico.

file <- read.table(file="/Users/bau/Desktop/teste/DISparam.txt", col.names=c('x','y'))
dados <- data.frame(x=file$x,y=file$y)


library(manipulate) 
modelo<-function(a,n,b,x){-((a*(x^(2*n)) + b)/((x-186)*(x+186)))}
modelo(1,3,3,c(1,2,3,4,5,6,9,12,18,24,30,36,48,60,72,84,96,120,144))
start <- list()
manipulate({plot(y~x,dados)
            curve(modelo(a=a,n=n,b=b,x),add=TRUE, col="blue")
            start <- list(a=a,n=n,b=b)},
           a=slider(-1.001,3, initial=-1.001),
           n=slider(-5.001,100,initial=-5.001),
           b=slider(1.001,100, initial = 1.001)
)

Mas uma função que tem singularidades é aceita para ajustar os dados no R? Se a função ajustasse, não teria problema o fato de ela apresentar singularidades?

Muito obrigada,

Michelle

 
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20140831/b405994c/attachment.html>