[R-es] Ajuste curva
Elvira Ferre Jaén
mariaelvira.ferre en um.es
Lun Nov 18 12:18:40 CET 2013
Hola,
quiero ajustar una curva sinoidal de la forma "f(x)=k/( 1+(c/log(x))^n)"
mediante la función 'nls' pero me da error el siguiente código:
>datos<-read.table(file="datos.csv", header=TRUE,sep=";",dec=",")
>library(nls)
>fit <- nls(y ~ k/(1+(c/log(x))^n), datos, start = list (k=100 , c
=5*10^(-6), n=1))
Error en numericDeriv(form[[3L]], names(ind), env) :
Missing value or an infinity produced when evaluating the model
¿Alguien me puede ayudar?
Adjunto un archivo csv con los datos.
Gracias y saludos!
Elvira.
--
Sec. Apoyo Estadístico.
Servicio de Apoyo a la Investigación (SAI)
Vicerrectorado de Investigación e Internacionalización.
Universidad de Murcia
Edif. SACE. Campus de Espinardo.
30100 Murcia
@. mariaelvira.ferre en um.es
T. 868 88 7315 F. 868 88 7302
www.um.es/sai www.um.es/ae
---
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20131118/f08cfbed/attachment.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: datos.csv
Type: text/csv
Size: 426 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20131118/f08cfbed/attachment.bin>
Más información sobre la lista de distribución R-help-es