Momento R do Dia – Revisando e expandindo um antigo Momento R do Dia

Topei com um exercício que eu mesmo fiz há alguns anos aqui. Só para atualizar, vou refazer o exercício.

library(TTR)
rdsa<-getYahooData("RDS-A",20090701, 20170101)$Close
rdsb<-getYahooData("RDS-B",20090701, 20170101)$Close

library(egcm)
e<-egcm(rdsa,rdsb)
plot(e)
summary(e)

O exercício falava do conceito de meia-vida. Citando o trecho:

Digamos que você tenha dois preços de ativos que cointegram (dados diários). Seu spread é o resíduo desta regressão. No caso de cointegração, há reversão à média, como já dito. Agora, digamos que eu calcule a meia-vida deste spread como igual a 5. Isto significa que você pode manter seu portfólio por cinco dias (este seria seu tempo ótimo – optimal holding period).

Ok, neste novo exercício, com uma amostra muito mais longa, a meia-vida foi de 27.68. Mais detalhes? Bem, replique o exercício no R.

Anúncios

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s