search for: unemployment_t

...ed! Thank You! (a) Produce a time-series plot of your data. (b) Fit linear, polynomial (use a power greater than 2), and R?s best fit models to your series. rm(list=ls(all=TRUE)) z=read.table("longtermunempdata.txt") names(z)= c("Unemployment") attach(z) TIME=seq(1,769,by=1) Unemployment_ts<-ts(Unemployment,start=1948,freq=12) #quartz() #plot(stl(Unemployment_ts,s.window="periodic")) #1A quartz() plot(TIME, Unemployment, xlab="Year", ylab="Long Term Unemployment",type='l') #1B Linear quartz() plot(TIME,Unemployment,type="l", xlab=&...