История изменений
Исправление 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=...) ))
})