LINUX.ORG.RU

История изменений

Исправление psv1967, (текущая версия) :

sapply(1:1000, function(i) {
    coef(nls(D[,i] ~ simefunc(x,a,b,c),
             start = list(a=..., b=..., c=...) ))
})
foreach(i=1:10, .combine=rbind) %do% {
    coef(nls(D[,i] ~ simefunc(x,a,b,c),
             start = list(a=..., b=..., c=...) ))
}

Исходная версия psv1967, :

sapply(1:1000, function(i) {
    coef(nls(D[,i] ~ simefunc(x,a,b,c),
             start = list(a=..., b=..., c=...) ))
})