是否可以按给定等级绘制以下数据并在 中指定该等级geom_plot
?或者我应该先订购这个因素。我的意思是,我想按照 B、A、C 的顺序绘制 ID,其中 B 是深蓝色,C 是浅蓝色。
tim.seq <- seq(as.POSIXlt("2013-07-01 00:00:00", origin="1960-01-01", tz="GMT"),
as.POSIXlt("2013-07-8 00:00:00", origin="1960-01-01", tz="GMT"),
by="1 hour")
id <- factor(sample(LETTERS[1:3], length(tim.seq), T, prob=c(0.4,0.8,0.2)))
rank <- factor(id, levels=levels(id), label=c(2,3,1))
data <- data.frame(time=tim.seq, id=id, rank=rank)
p1 <- ggplot(data, aes(x=time, y=..count.., alpha=id))
p1 <- p1 + geom_bar(fill="darkblue", binwidth=60*60*24, position="identity")
p1 <- p1 + scale_alpha_discrete(range=c(1, 0.2))
p1