Rでローソク足チャート

使用したソフトウェアのバージョン
R 2.9.0, quantmod 0.3-7, xts 0.6-4, zoo 1.5-5


library("quantmod")
data <- read.zoo("7974.csv", header=T, sep=",")
candleChart(data)

7974.csvは次の形式です。(先頭5日分のみ)
"Date","Open","High","Low","Close","Volume"
2009/04/27,26100,26260,25740,25920,747200
2009/04/24,26300,26680,26030,26070,1063700
2009/04/23,26460,26900,26000,26840,1246100
2009/04/22,26000,26380,25650,26210,1279200
2009/04/21,25010,25860,24840,25440,1582400

参考にした情報
[R-SIG-Finance] as.xts of a data.frame
https://stat.ethz.ch/pipermail/r-sig-finance/2009q2/003883.html