2
library(xts)
data(sample_matrix)
matrix_xts <- as.xts(sample_matrix, dateFormat='Date')
matrix_xts[,1] = matrix_xts[,1] * 100
plot(matrix_xts)
私はこれをプロットした場合には、データを視覚化するのは難しいであろう。何とか最初の列をxts.plotの二次y軸にプロットすることは可能ですか?