Лучший способ построить данные минут OHLC из импортированного CSV в R

Question

Мне потребовалось немало времени, чтобы заставить это работать, но я построил график OHLC для 1-минутных таймфреймов для AAPL 28.02.14, используя следующую функцию. Файл csv можно скачать здесь, https://drive.google.com/file/d/0B4xAKSwsHiEBRGlyMEE3V0ROckU/edit?usp=sharing

PlotAAPLData <- function()
{

  library(zoo)
  library(quantmod)

  z <- read.csv("AAPL 1 min 2-28-14.csv", stringsAsFactors = F)
  z <- read.zoo(z, header = TRUE, index = 1:2, tz = "", format = "%m/%d/%y %H:%M")
  z$Volume <- 0
  z$Adjusted <- 0
  z <- as.quantmod.OHLC(z)
  chartSeries(z, type = "bars", theme = chartTheme("white"))
}

Мне пришлось заставить данные работать с QuantMod, однако мне не нужны какие-либо функциональные возможности, которые предлагает QuantMod, кроме построения графика OHLC, поэтому преобразование их в этот формат не является действительно необходимым.

Есть ли лучший способ сделать это? Самым сложным было получить данные в формате зоопарка, поскольку даты должны быть именно такими. Глядя на это сейчас, это не кажется таким сложным, но это было какое-то время.

Благодарю.