我想使用 ggplot2 创建一个分面图,其中 y 轴的最小限制将被固定(比如 0),最大限制将由分面中的数据确定(就像当scales="free_y"
. 我希望像下面这样的东西会起作用,但没有这样的运气:
library(plyr)
library(ggplot2)
#Create the underlying data
l <- gl(2, 10, 20, labels=letters[1:2])
x <- rep(1:10, 2)
y <- c(runif(10), runif(10)*100)
df <- data.frame(l=l, x=x, y=y)
#Create a separate data frame to define axis limits
dfLim <- ddply(df, .(l), function(y) max(y$y))
names(dfLim)[2] <- "yMax"
dfLim$yMin <- 0
#Create a plot that works, but has totally free scales
p <- ggplot(df, aes(x=x, y=y)) + geom_point() + facet_wrap(~l, scales="free_y")
#Add y limits defined by the limits dataframe
p + ylim(dfLim$yMin, dfLim$yMax)
这会引发错误 ( length(lims) == 2 is not TRUE
) 对我来说并不奇怪,但我想不出一种策略来解决这个问题。