Ivan
conhecendo o spontos de corte o modelo se torna linear
portanto a nls pode ser usada com a opçãp "plinear" e a iteracao
numérica é feirta em uma dimensao menos (apenas dos pontos de conte)
Isto deve ajudar muito na convergencia
Em Qui, 2011-11-17 às 05:20 -0800, Ivan Bezerra Allaman escreveu:
> Descobri o erro na função. O correto seria:
>
>
> segment_lpl <- function(x,b0,b1,b2,X0,X1){
> (b0+b1*x)*(x<=X0)+
> (b0+b1*X0)*(X0<x & x<X1)+
> (b0+b1*X0-b2*(X1-x))*(x>=X1)
> }
>
>
> Só não entendo o porque que não estou conseguindo convergência, uma
> vez que estou fornecendo exatamente os valores que o gráfico
> interativo está fornecendo. Se alguém descobrir, fico grato.
>
>
> (S,f,P)
> Allaman
>
>
> \begin{signature}
> <<>>=
> Prof. Dr. Ivan Bezerra Allaman
> Universidade Estadual de Santa Cruz
> Departamento de Ciências Exatas e Tecnológicas
> Ilhéus/BA - Brasil
> Fone: +55 73 3680-5076
> E-mail: [email protected]/[email protected]
> @
> \end{signature}
> _______________________________________________
> R-br mailing list
> [email protected]
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
> mínimo reproduzível.
_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
mínimo reproduzível.
