Я пытался научиться подгонять стохастик DE к различным наборам данных, но безрезультатно.Я, кажется, снова и снова сталкиваюсь с одной и той же проблемой, когда вменяю данные в пакет athe yuima.В первом столбце CSV указана дата, а во втором - ставки.Дата как chr.Я пробовал преобразование 2, но продолжаю получать метод «initialize», возвращающий объект класса «NULL» вместо требуемого класса «yuima», и я не могу найти достаточно информации о пакете yuima - но я думаю, что проблема большеОсновной, чем это.Пожалуйста и спасибо.
require(sde)
require(yuima)
require(stats4)
set.seed(123456789)
X <- read.csv(header = FALSE, "data.csv", sep = "," )
X$date <- as.Date(X$date, format = "%m/%d/%Y")
#X$date <- difftime(X$date, X$date[1], units = 'day')
X <- zoo(X)
mod1 <- setModel(drift="(2-theta2*x)",diffusion="(1+x^2)^theta1")
yuima1 <- setYuima(model=mod1, data=setData(X))
param.init <- list(theta1=1,theta=1)
low.par <- list(theta1=0,theta2=0)
upp.par <- list(theta1=1,theta2=1)
mle1 <- qmle(yuima , start=param.init, lower=low.par, upper=upp.par)
summary(mle1)
Игрушечный набор моих данных выглядит следующим образом:
V1 V2
1 4/28/2013 134.21
2 4/29/2013 144.54
3 4/30/2013 139.00
4 5/1/2013 116.99
5 5/2/2013 105.21
6 5/3/2013 97.75