data(FXtrade.transactions)
plot(as.POSIXct(FXtrade.transactions$date, format = "%F %T"),
FXtrade.transactions$transactions, type = "l",
xlab = "day", ylab = "transactions in 5-minute intervals")
Run the code above in your browser using DataLab