nls 열악한 곡선 피팅

Question

여러 가지 S 자형 커브를 피팅하는 데 문제가 있습니다. 더 나은 피팅을위한 약간의 도움은 정말 감사하겠습니다.

나는 세 가지 모델을 시도하고있다 : 무게

4 개 매개 변수

nls(y ~ a + (k-a) /(1 + (x/c)^e)^m, start=list(a=a_start, k=k_start, c=c_start, m=m_start, e=e_start), control = list(maxiter = 50000, minFactor=1/2000, warnOnly=T), algorithm = "port") 

5 매개 변수

nls(y ~ a + (k-a) /(1 + exp(-1/c*(x-e)))^m, start=list(a=a_start, k=k_start, c=c_start, m=m_start, e=e_start), trace=T, lower=c(a=-10000, k=0, c=0, m=0, e=0), upper=c(a=1000, k=100000, c=50, m=5, e=50), control = list(maxiter = 50000, minFactor=1/2000, warnOnly=T)) 

5 매개 변수를

nls(y ~ a + (k-a) /(1 + exp(-1/c*(x-e)))^m, weights = (1/residuals(fit)^2), start=list(a=a_start, k=k_start, c=c_start, m=m_start, e=e_start), trace=T, lower=c(a=-10000, k=0, c=0, m=0, e=0), upper=c(a=1000, k=100000, c=50, m=5, e=50), control = list(maxiter = 50000, minFactor=1/2000, warnOnly=T)) 

4PL 좋은 피팅

5pl 좋은 피팅

가난한 피팅

시그 모이 기능

Answer 1

나는 부분적으로 내 문제를 해결했다. 저는 성장 초기에 좋은 관심을 보이기 때문에 그 지역에서 더 많은 중요성을 부여하기 위해 맞춤식 가중치를 사용했습니다.