powered by
Cpi
str(Cpi) attach(Cpi) plot(Year,CPI,type="l",lty=2,lwd=2,col="red") names(CPI) <- Year barplot(CPI,col="pink",las=2,main="Problem 1.34") detach(Cpi)
Run the code above in your browser using DataLab