графики в одном окне в ggplot2

Question

У меня есть следующий код, который генерирует отдельные графики. Я хочу получить все эти сюжеты в одной сетке. Как это можно сделать? Есть ли альтернативный метод в решетке, чтобы получить аналогичные графики?

v1 <- rep(c(2,4,6,8,10), each = 6) 
v2 <- rep(1:3,10) 
v3 <-runif(30,0.01,0.3) 
combined_data <- data.frame(v1,v2,v3) 
library(ggplot2) 
ggplot(combined_data,aes(x=v2,y=v3))+ 
stat_summary(fun.y=mean,geom="line",color="blue",linetype=2)+ 
stat_summary(fun.y=mean,geom="point", pch=1,size=3)+ 
scale_x_continuous(breaks=combined_data$v2)+ 
facet_grid(~v1)+ 
theme_bw() 

Answer 1

Я думаю, что это может быть то, что вы хотите. Вам нужно много работать с факторами ggplot2. Вы можете попробовать использовать geom = "line" во втором stat_summary.

v1 <- rep(c(2,4,6,8,10), each = 6) 
v2 <- rep(1:3,10) 
v3 <-runif(30,0.01,0.3) 
combined_data <- data.frame(v1,v2,v3) 
combined_data$f1 = as.factor(v1) 
library(ggplot2) 
ggplot(combined_data,aes(x=v2,y=v3,color=f1))+ 
    stat_summary(fun.y=mean,geom="line",color="blue",linetype=2)+ 
    stat_summary(fun.y=mean,geom="point", pch=1,size=3)+ 
    scale_x_continuous(breaks=combined_data$v2)+ 
    #facet_grid(~v1)+ 
    theme_bw() 

выходы:

Answer 2

v1 <- rep(c(2,4,6,8,10), each = 6) 
v2 <- rep(1:3,10) 
v3 <-runif(30,0.01,0.3) 
combined_data <- data.frame(v1,v2,v3) 
library(ggplot2) 
ggplot(combined_data,aes(x=v2,y=v3))+ 
stat_summary(fun.y=mean,geom="line",aes(color=as.factor(v1)),linetype=2)+ 
stat_summary(fun.y=mean,geom="point",pch=1,size=3,aes(color=as.factor(v1)))+ 
scale_x_continuous(breaks=combined_data$v2)+ 
#facet_grid(~v1)+ 
theme_bw() 

Answer 3

Вы должны добавить aes(group = v1) к stat_summary:

library(ggplot2) 
ggplot(combined_data,aes(x = v2, y = v3))+ 
    stat_summary(fun.y = mean, geom = "line", color = "blue", linetype = 2, 
       aes(group = v1))+ 
    stat_summary(fun.y = mean, geom = "point", pch = 1, size = 3, 
       aes(group = v1))+ 
    scale_x_continuous(breaks = v2)+ 
    theme_bw()