小编use*_*010的帖子

所以我试图制作一个条形宽度映射到变量的堆积条形图; 但我希望我的酒吧之间的间距保持不变.

有谁知道如何使条之间的间距恒定？

现在我有这个:

p<-ggplot(dd, aes(variable, value.y, fill=Date, width=value.x / 15))+ coord_flip() + opts(ylab="") 

p1<-p+ geom_bar(stat="identity") + scale_fill_brewer(palette="Dark2") + scale_fill_hue(l=55,c=55)

p2<-p1 + opts(axis.title.x = theme_blank(), axis.title.y = theme_blank())

p2

提前致谢.

顺便说一句,这是我的数据(对于冗长,庞大的输入而言,这是抱歉的):

> dput(dd)
structure(list(variable = structure(c(1L, 1L, 1L, 1L, 1L, 3L, 
3L, 3L, 3L, 3L, 4L, 4L, 4L, 4L, 4L, 7L, 7L, 7L, 7L, 7L, 2L, 2L, 
2L, 2L, 2L, 6L, 6L, 6L, 6L, 6L, 5L, 5L, 5L, 5L, 5L, 9L, 9L, 9L, 
9L, 9L, 8L, 8L, 8L, 8L, 8L), …

所以,我有一个包含两个因子和一个数字变量的数据框,如下所示:

>D
f1 f2 v1 
1   A  23
2   A  45
2   B  27
     .
     .
     .

所以f1的水平是1和2,而f2的水平是A和B.这就是f1 = 1和f2 = B时没有输入的值(即D $ V1 [D $ f1 = 1& D $ f2 = B]不存在)实际上这应该是零.

在我的实际数据帧中,我有11个级别的f1和接近150个级别的f2,我需要为我的数据帧中缺少的f1和f2的每个组合创建一个v1 = 0的观察.

我该怎么做呢？

提前致谢,

伊恩

所以,我从拍卖中获得了大量的数据集(大约40万个观测值).我正在尝试使用ggplot按天绘制拍卖价格,同时用垂直线表示颜色和月份.

我有一个POSIXlt向量来保存我的日期,这是我正在使用的:

firstmonth<- c(1,32,60,91,121,152,182,213,244,274,305,335)

require(ggplot2)
p <- ggplot(bb, aes(saledate$yday, SalePrice))
p <- p + geom_point(aes(color = factor(saledate$year)), alpha = I(1/30)) #This plot works
p + geom_vline(aes(xintercept = firstmonth))
Error in data.frame(xintercept = c(1, 32, 60, 91, 121, 152, 182, 213,  : 
  arguments imply differing number of rows: 12, 401125

这个错误是什么？为什么我不能得到垂直线？