library(forecast)
data1 = read.table("D:\\FSU-school\\statapp2\\project\\4-17\\data8.txt", header=TRUE)
attributes(data1)
attach(data1)

data1ts = ts(data1,  start=c(2004, 4), frequency=365)

y = auto.arima(data1ts)