我试图在ggplot中制作一个条形图,在其中通过强制一些标签为空字符串,即为"",来指定要显示哪些标签。但是,我遇到了以下错误:
Error in grid.Call("L_textBounds", as.graphicsAnnot(x$label), x$x, x$y,
: Polygon edge not found (zero-width or zero-height?)
尝试这样做时会出错。
以下代码将重现此错误。
希望有人能解释为什么我不能像我所做的那样操作。
library(ggplot2)
dataset<-matrix(ncol=3,nrow=12)
colnames(dataset)<-c("Score","Action","Bin")
dataset[1:9,1]<-c(1,2,3,-2,7,10,12,3,4)
dataset[1:9,2]<-rep(1,9)
dataset[10:12,1]<-c(-1,-2,-3)
dataset[10:12,2]<-rep(2,3)
dataset[1:12,3]<-as.character(cut(dataset[1:12,1:1],breaks=4))
myDataset<-as.data.frame(dataset)
chosenbreaks<-as.vector(unique(dataset[1:12,3]))
chosenlabels<-as.vector(c(chosenbreaks[1],"","",chosenbreaks[4]))
fullplot<-ggplot(myDataset, aes(Bin, fill=Action))
+ geom_bar(position="stack")
+ opts(axis.text.x = theme_text(angle = 45,size=8))
+ scale_x_discrete("test",breaks=chosenbreaks,labels=chosenlabels)
fullplot
提前感谢您,
Christian
i386-pc-mingw32 / i386
对我来说很陌生。)我在Windows 7上使用不同的工作流程时遇到了这个错误,所以这是另一个例子,热心的编辑投票使每个人的生活更加复杂吗? - geotheory