Hi there. I have a multiple plotline based for each group, but every plot has a different X/Y limit, so if I plot all of them, I would have to adjust that based on each plot's max value.
This is an example of what I say:
df<-mpg
###Increase Audi Values
df[which(grepl("audi",mpg$manufacturer)),9]<- df[which(grepl("audi",mpg$manufacturer)),9]*1000
#My plot
ggplot(df, aes(x = cty, y = hwy, colour = manufacturer)) +
geom_point() +
facet_wrap( ~ manufacturer)+
geom_smooth(method = "lm") +
theme_minimal()