如何指定GGPLOT2独立轴的曲线图的尺寸标注

Question

说我有一个数据帧，并希望做图

df <- melt(iris) 

p <- ggplot(data = df, aes(x = Species, y = value)) + 
     geom_boxplot() + theme(aspect.ratio = 1) 

我则想用ggsave（）保存的这一个pdf情节

ggsave(plot = p, width = 3, height = 3, dpi = 300, filename = "not squished axis.pdf") 

的问题是，我想指定的情节本身的尺寸，但独立的，这样的情节W的下方指定轴标签根据轴的绝对长度而不同的尺寸和尺寸。

q <- ggplot(data = df, aes(x = Species, y = (value)*10000000)) + 
     geom_boxplot() + theme(aspect.ratio = 1) 

ggsave(plot = q, width = 3, height = 3, dpi = 300, filename = "squished axis.pdf") 

有没有一种方法可以轻松地做到这一点？

这里是一个曲线图的一个例子接近我想在轴长度的术语：

唯一的问题是，通过改变高宽比，我最终压扁在y使x轴更接近于均匀长度...

Answer 1

我不明白你在做什么，所以这在黑暗中有点刺伤。

可以使用使用facet_wrap相同的比例显示两个地块：

# Your sample data 
df <- list(
    one = melt(iris), 
    two = with(melt(iris), cbind.data.frame(Species, variable, value * 1000))); 
df <- melt(df); 

ggplot(df, aes(x = Species, y = value)) + 
    geom_boxplot() + theme(aspect.ratio = 1) + 
    facet_wrap(~ L1); 

或允许y标尺，为各个方面自由变化。

ggplot(df, aes(x = Species, y = value)) + 
    geom_boxplot() + theme(aspect.ratio = 1) + 
    facet_wrap(~ L1, scales = "free_y"); 

您可以调整小面的网格布局，通过指定用nrow和ncol列或行的数。

因此，例如，两个地块的垂直放置，你可以做

ggplot(df, aes(x = Species, y = value)) + 
    geom_boxplot() + theme(aspect.ratio = 1) + 
    facet_wrap(~ L1, ncol = 1, scales = "free_y");