I want draw a zig zag graph with proper date format while it show date like 2001.00,2001.01 etc
#import forecast library
library('forecast');
#prepare rawdata object for froecating
rawdata <- read.csv('bigDataSet6.csv',sep=',' ,head=TRUE);
attach(rawdata);
#attach data object in r
head(rawdata);
rawdata$Date <- as.Date(rawdata$Date);
#Using build in ts object
sts = ts(rawdata$Sale, start=2001, frequency=365);
#set Forecasting model
model.ets = ets(sts, model='ANA');
fc.ets = forecast(model.ets,12);
# plot graph
plot(fc.ets)
Please suggest if something is wrong in my code