raw_id$Low,raw_id$Close),order.by=date.d) q <- as.quantmod.OHLC(z, col.names = c("Open", "High", "Low", "Close")) png("Eurusd-id.png", width=1400, height=750...
