我有以下数据,并尝试使用ggplot2在R中创建一个条形图,其中包含与日期值相关的值
conv = c(10, 4.76, 17.14, 25, 26.47, 37.5, 20.83, 25.53, 32.5, 16.7, 27.33)
click = c(20, 42, 35, 28, 34, 48, 48, 47, 40, 30, 30)
dat <- data.frame(date=c("July 7", "July 8", "July 9", "July 10", "July 11", "July 12", "July 13",
"July 14", "July 15", "July 16", "July 17"), click=c(click), conv=c(conv))
dat
但是,当我运行以下命令时,条形图的顺序不正确。
library(ggplot2)
ggplot(dat, aes(date, conv)) + geom_bar(fill="#336699") + ylim(c(0,50)) +
opts(title="") +
opts(axis.text.y=theme_text(family="sans", face="bold", size=10)) +
opts(axis.text.x=theme_text(family="sans", face="bold", size=8)) +
opts(plot.title = theme_text(size=15, face="bold")) +
xlab("") + ylab("")
变量日期从7月7日到7月17日正确订购,并且不知道为什么ggplot2有这个问题。是否有快速功能来解决此问题,而无需重新排序原始数据集中的数据。
答案 0 :(得分:4)
您的排序顺序不起作用的原因是您有一个字符串,而不是日期。您最好的选择是将日期转换为日期格式:
dat$date <- as.Date(paste(dat$date, "2011"), format="%b %d %Y")
ggplot(dat, aes(as.character(date), conv)) + geom_bar(fill="#336699") +
ylim(c(0,50)) +
opts(title="") +
opts(axis.text.y=theme_text(family="sans", face="bold", size=10)) +
opts(axis.text.x=theme_text(family="sans", face="bold", size=8, angle=90)) +
opts(plot.title = theme_text(size=15, face="bold")) +
xlab("") + ylab("")