切断ggplot2中的密度图

Question

我用

frame <- read.table(paste('data', fname, sep="/"), sep=",", header=TRUE)
colnames(frame) <- c("pos", "word.length")
plot <- ggplot(frame, aes(x=pos, y=word.length)) + xlim(0,20) + ylim(0,20) + geom_density2d() + stat_density2d(aes(color=..level..))
png(paste("graphs/", fname, ".png", sep=""), width=600, height=600)
print(plot)
dev.off()

创建情节，但它们会被切断。我该如何解决这个问题？

http://ompldr.org/vZTN0eQ

我用来创建此图的数据：http://sprunge.us/gKiL

Answer 1

根据ggplot2一书，您使用scale_x_continuous(limits=c(1,20))代替xlim(1,20)。