R: добавить функцию в производную таблицу - PullRequest
0 голосов

Моя конечная цель - получить приближение 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 в консоль, она покажет производную ОК.

Спасибо.

...