chartSeries를 사용하고 Y 축이 잘 렸습니다. 나는 오른쪽에있는 가격을 소수점 이하 2 자리까지 늘리고 싶다. 마진이나 글자 크기의 문제 인 것 같지만, 주위를 검색 한 후에는이 옵션을 조정할 수있는 곳을 찾을 수 없습니다. 나는 도표의 왼편에 충분한 공간이있는 것 같아서 여백을 말한다.Y 축은 Chart 시리즈를 사용하여 잘립니다.
아이디어가 있으십니까? 감사. 나는 소스 코드를 수정하지 않고 당신이 원하는 것을 할 수있는 방법이라고 생각하지 않습니다
require (zoo)
require(quantmod)
data <- structure(list(Date = structure(list(sec = c(0, 0, 0, 0, 0, 0
), min = 0:5, hour = c(15L, 15L, 15L, 15L, 15L, 15L), mday = c(3L,
3L, 3L, 3L, 3L, 3L), mon = c(0L, 0L, 0L, 0L, 0L, 0L), year = c(114L,
114L, 114L, 114L, 114L, 114L), wday = c(5L, 5L, 5L, 5L, 5L, 5L
), yday = c(2L, 2L, 2L, 2L, 2L, 2L), isdst = c(0L, 0L, 0L, 0L,
0L, 0L)), .Names = c("sec", "min", "hour", "mday", "mon", "year",
"wday", "yday", "isdst"), class = c("POSIXlt", "POSIXt")), Open = c(544.95,
544.8, 544.84, 544.8, 544.75, 544.78), High = c(545.1, 544.89,
544.9, 544.8, 544.8, 545.03), Low = c(544.8, 544.77, 544.79,
544.6, 544.66, 544.76), Close = c(544.86, 544.79, 544.8, 544.69,
544.75, 545.01)), .Names = c("Date", "Open", "High", "Low", "Close"
), row.names = 330:335, class = "data.frame")
data$Date <- as.POSIXct(strptime(data$Date, format = "%Y-%m-%d %H:%M:%S"))
data <- read.zoo(data, FUN=as.POSIXct)
chartSeries(data, type = "bars", theme = chartTheme("white"))
당신이 마음에 들지 않으면 소스 코드를 편집하면서 제안한 솔루션 인'chart_Series'를 사용하여'chart_pars()'를 편집하여 원하는 효과를 얻을 수있었습니다. – FXQuantTrader