R - por favor, compartilhe suas experiências - página 6

 
RandomWorker:

Eu entrei no EURUSD em R. Calculei o modelo e calculei o coeficiente. Como desenhar o gráfico e alinhá-lo com o kotir?


?trama ?linhas ?pontos

A propósito, você acabou de estimar o modelo. A previsão é feita através da função de previsão.

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:


?trama ?linhas ?pontos

A propósito, você só estimou o modelo. A previsão é feita através da função de previsão.

Obrigado. É difícil para mim, no entanto. Vou tentar.

O que você escreveu vai se basear na história?

 
anonymous:


?trama ?linhas ?pontos

A propósito, você só estimou o modelo. A previsão é feita através da função de previsão.

Eu descobri um pouco.

Não estou interessado em previsões.

Eu tenho um modelo que considero como um indicador algo como MA. Como faço para desenhá-lo na história onde o modelo é calculado?

 
RandomWorker:

Como você desenha na história sobre a qual o modelo foi calculado?


?trama ?linhas

library(TTR)

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

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


?trama ?linhas

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

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

Coeficientes:
1 2 3
0.9420 0.1955 -0.1644

Pedido selecionado 3 sigma^2 estimado em 2,73e-06
> trama(x, t = 'l')
Erro em xy.coords(x, y, xlabel, ylabel, log) :

'x' é uma lista, mas não tem componentes 'x' e 'y'.

Desculpe, mas eu devo ser extremamente estúpido.

 
RandomWorker:
> trama(x, t = 'l')


Tente isto: plot(eur[1:256], t='l')

 
anonymous:


Tente desta forma: plot(eur[1:256], t='l')

Nenhuma pergunta feita. Fui eu que o desenhei. Mas é um vetor.

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

Aqui x não é um vetor. Tem uma fórmula dentro dela que pode ser usada para fazer cálculos como na previsão, somente na história

 
RandomWorker:

Nenhuma pergunta feita. Fui eu que o desenhei. Mas é um vetor.

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

Aqui x não é um vetor. Tem uma fórmula dentro dela que pode ser usada para fazer cálculos como em prefixo, apenas sobre a história


O comando ?ar nos diz que x é uma lista, não uma fórmula. Assim como a classe(x).

O comando str(x) mostra o conteúdo do objeto.

O ajuste(x) dá NULL, mas x tem um componente residente (resíduos para os dados originais) - os valores do modelo ainda podem ser computados: (eur[1:256]-x$resid).

Lote(eur[1:256], t='l')

Adicionar uma linha de valores do modelo: linhas(eur[1:256]-x$resid, col='vermelho')

 
anonymous:


O comando ?ar nos diz que x é uma lista, não uma fórmula. Assim como a classe(x).

O comando str(x) mostra o conteúdo do objeto.

O ajuste(x) dá NULL, mas x tem um componente residente (resíduos para dados brutos) - os valores do modelo ainda podem ser computados: (eur[1:256]-x$resid).

Lote(eur[1:256], t='l')

Adicionar uma linha de valores do modelo: linhas(eur[1:256]-x$resid, col='vermelho')

Muito obrigado.

Mas de alguma forma é surpreendente que nós, tendo uma fórmula, calculamos indiretamente seu valor. O predicado está lá, o resultado do ajuste não está.

 

Algum tipo de ajuste esquisito.

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

> x


chamada:

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


Coeficientes:

1 2 3

0.9425 0.1967 -0.1647

Pedido especificado .max = 20, mas apenas três coeficientes. Eu entendo assim:

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

É suposto haver 20 membros?

Além disso, mudei parâmetros diferentes, são sempre três coeficientes e eles são muito ligeiramente diferentes.

Por favor, comente sobre isto.