我无法让 x 轴以“Jan-99”格式显示刻度......
纽约数据如下:
head(rates,10)
Month Repo_Rate
1 Apr-01 9.00
2 May-01 8.75
3 Jun-01 8.50
4 Jul-01 8.50
5 Aug-01 8.50
6 Sep-01 8.50
7 Oct-01 8.50
8 Nov-01 8.50
9 Dec-01 8.50
10 Jan-02 8.50
sapply(rates,class)
Month Repo_Rate
"character" "numeric"
如果我将“月份”列转换为 R 日期格式,我仍然没有获得所需格式“Apr-01”的 x 轴刻度......
这里需要帮助......
Try
library(xts)
xt1 <- xts(rates$Repo_Rate, order.by = as.yearmon(rates$Month, '%b-%y'))
plot(xt1)
或者使用zoo
library(zoo)
z1 <- with(rates, zoo(Repo_Rate, order.by= as.yearmon(Month, '%b-%y')))
plot(z1, xaxt = 'n')
tt <- time(z1)[seq(1, length(z1), by = 2)]
axis(1, tt, format(tt, '%b-%y'), las = 1)
or
library(zoo)
library(ggplot2)
fmt <- "%b-%y"
z <- read.zoo(rates, FUN = as.yearmon, format = fmt)
autoplot(z) + scale_x_yearmon(format = fmt)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)