R - lütfen deneyimlerinizi paylaşın - sayfa 6

Yeni yorum
 
RandomWorker :

R EURUSD'ye yönlendirildi. Modeli hesapladım ve katsayısını hesapladım. Bir grafik nasıl çizilir ve bir alıntı ile nasıl birleştirilir?


?arsa hatları ? puan

Bu arada, modeli takdir ettin. Tahmin, tahmin işlevi tarafından yapılır. 

n <- 100
n.ahead <- 15
ts <- sin( 0.05 * pi * ( 1 : n)) + rnorm(n = n, mean = 0 , sd = 0.1 )
ts.model <- ar(ts, method = 'burg' )
ts.pred <- predict(ts.model, n.ahead = n.ahead)
plot(
   1 : (n + n.ahead),
  c(ts, rep(NA, n.ahead)),
  t = 'l'
  )
lines(
  (n + 1 ) : (n + n.ahead),
   as .numeric(ts.pred$pred),
  col = 'gray'
  )
lines(
  (n + 1 ) : (n + n.ahead),
   as .numeric(ts.pred$pred) + as .numeric(ts.pred$se),
  col = 'gray' ,
  lty = 'dashed'
  )
lines(
  (n + 1 ) : (n + n.ahead),
   as .numeric(ts.pred$pred) - as .numeric(ts.pred$se),
  col = 'gray' ,
  lty = 'dashed'
  )
 
anonymous :


?çizgiler ?noktalar

Bu arada, modeli takdir ettin. Tahmin, tahmin işlevi tarafından yapılır.

Teşekkür ederim. Benim için zor olsa da. Deneyeceğim.

Yazdıklarınız tarihe ışık tutacak mı?

 
anonymous :


?çizgiler ?noktalar

Bu arada, modeli takdir ettin. Tahmin, tahmin işlevi tarafından yapılır.

Biraz anladım.

Tahminle ilgilenmiyorum.

MA gibi bir gösterge olarak düşündüğüm bir modelim var. Modelin hesaplandığı tarihe nasıl çizilir?

 
RandomWorker :

Modelin hesaplandığı tarihe nasıl çizilir?


?arsa hatları 

library(TTR)

x <- cumsum(rnorm(100))
x.ma <- EMA(x, 10)

plot(x, t = 'l')
lines(x.ma, col = 'red')
 
anonymous :


?arsa hatları

> x<-ar(eur[1:256],method="mle")
> x

aramak:
ar(x = eur[1:256], yöntem = "mle")

katsayılar:
1 2 3
0,9420 0,1955 -0,1644

Seçilen sipariş 3 sigma^2 tahmini 2.73e-06
>çizgi(x, t = 'l')
xy.coords(x, y, xlabel, ylabel, log) hatası:

'x' bir listedir, ancak 'x' ve 'y' bileşenlerine sahip değildir

Üzgünüm, ama olağanüstü bir aptal olmalıyım.

 
RandomWorker :
>çizgi(x, t = 'l')


Bunu deneyin: arsa(eur[1:256], t='l')

 
anonymous :


Bunu deneyin: arsa(eur[1:256], t='l')

Soru yok. Ben çizdim. Ama bu bir vektör.

x<-ar(eur[1:256],method="mle")

Burada x bir vektör değil. İçinde, bir tahminde olduğu gibi, yalnızca tarih üzerine hesaplamalar yapabileceğiniz bir formül var.

 
RandomWorker :

Soru yok. Ben çizdim. Ama bu bir vektör.

x<-ar(eur[1:256],method="mle")

Burada x bir vektör değil. İçinde, bir tahminde olduğu gibi, yalnızca tarih üzerine hesaplamalar yapabileceğiniz bir formül var.


?ar komutu size x'in bir formül değil bir liste olduğunu söyler. Tıpkı class(x) gibi.

str(x) komutu bir nesnenin içeriğini gösterir.

fit(x) NULL değerini verir, ancak x'in kalıcı bir bileşeni vardır (orijinal veriler için artıklar) - model değerleri yine de hesaplanabilir: (eur[1:256]-x$resid).

Geçmiş verileri çizme: plot(eur[1:256], t='l')

Model değerleri satırı ekleyin: line(eur[1:256]-x$resid, col='red')

 
anonymous :


?ar komutu size x'in bir formül değil bir liste olduğunu söyler. Tıpkı class(x) gibi.

str(x) komutu bir nesnenin içeriğini gösterir.

fit(x) NULL değerini verir, ancak x'in kalıcı bir bileşeni vardır (orijinal veriler için artıklar) - model değerleri yine de hesaplanabilir: (eur[1:256]-x$resid).

Geçmiş verileri çizme: plot(eur[1:256], t='l')

Model değerleri satırı ekleyin: line(eur[1:256]-x$resid, col='red')

Olmuş! teşekkür etmek.

Ancak bir formüle sahip olduğumuz için değerini dolaylı olarak hesaplamamız bir şekilde şaşırtıcı. Bir tahmin var, ancak uygun bir sonuç yok.

 

Bazı garip uyum

> x<-ar.ols(eur[1:256], order.max = 20, demean = DOĞRU)

> x


aramak:

ar.ols(x = eur[1:256], order.max = 20, demean = DOĞRU)


katsayılar:

1 2 3

0.9425 0.1967 -0.1647

Belirtilen order.max = 20, ancak yalnızca üç katsayı. şöyle anlıyorum:

eur = 0,9425 + 0,1967*eur(-1) + (-0,1647)*eur(-2)

20 üye olmalı mı?

Ek olarak, farklı parametreleri her zaman üç katsayı olarak değiştirdim ve çok az farklılık gösteriyorlar.

Lütfen yorum yap.

12345678
Yeni yorum