Exam Slide

J James Reade

04/02/2015

After the exam…

trade <- read.csv("Lecture-7/trade_030215.csv",stringsAsFactors=F)
trade$date <- as.Date(substr(trade$DateTime,1,8),"%Y%m%d")
plot(trade$date,trade$Actual,type="o",ylab="Total Trade Balance (ÂŁ)",xlab="Date")