Моя конечная цель - получить приближение nls (), для которого не потребуются начальные параметры.
Для этого я использую функцию selfStart ().Однако для этого требуется, чтобы функция модели была в таблице производных.
Я печатаю следующее:
Gauss <- function(z, A, sigma, z0, C){
C + A/sigma * (2*pi)^(-0.5) * exp(-(z-z0)^2/(2*sigma^2))
}
drule[["Gauss"]] = alist(z = -A/sigma*(2*pi)^(-0.5)*(z - z0)*exp(-(z-
z0)^2/(2*sigma^2))/(sigma^2), A = NULL, sigma = NULL, z0 = NULL, C = NULL)
Однако я все еще получаю сообщение об ошибке "Функция" Гаусса "отсутствуеттаблица производных ".
Кто-нибудь знает, почему она не считается?
Если я запишу drule $ Gauss в консоль, она покажет производную ОК.
Спасибо.