SERIES TEMPORALES CON ZOO

He cargado una librería para el manejo de series temporales que se llama zoo.

Para cargarla seguir estos pasos (instalación.

Una vez la tenemos en R, para usarla lo primero es cargarla en memoria:

> library("zoo")

Tengo los datos en un fichero llamadoibex35.dat de texto en la forma:

fecha,cierre
03/01/2000,11610
04/01/2000,11206.6
05/01/2000,10863.1
07/01/2000,11102.4
10/01/2000,11173.3
11/01/2000,11012.4
12/01/2000,10851.8
13/01/2000,10931.9
14/01/2000,11184
17/01/2000,11285.6
18/01/2000,11066.3
19/01/2000,11120.7
.........

para leer los datos como serie temporal escribo

> serie1<-read.zoo("c:\\ibex35_1.dat",sep=",",header=TRUE, format = "%d/%m/%Y")

Ya lo tengo en R. Para ver la serie temporal:

> plot(serie1)

si por ejemplo quiero unir en la misma serie otra, uso el comando merge

> m<-merge(serie1,lag(serie1,-20))

si las quiero pintar juntas escribo:

> plot(m,plot.type="single",col=c("red","blue"),lwd=2)

Para seleccionar entre dos fechas:

> m1=window(serie1,start=as.Date("2006-01-01"),end=as.Date("2007-01-01"))
> plot(m1)

Hay una forma sencilla de leer datos de yahoo directamentes desde R lo prinmero es cargar la librería tseries y despues ejecutar el comando

> library("tseries")
> ibex<-get.hist.quote(instrument="^IBEX",start="2004-01-01",end="2004-12-31",quote="Close")
>#para leer datos mensuales:
> ibex_men<-get.hist.quote(instrument="^IBEX",start="2004-01-01",end="2004-12-31",compression="m",quote="Close")