Fitting a line to the mean values of a multilevel variable using geom_smooth

debugcn Published at Dev

pyring

I create a plot representing on the y-axis "value" and on the x-axis each of the levels of "Column_S", which contains levels from S1 to S10. All this grouped by "VS" and "Inst" (with a facet_grid) and "Estatus" with colour.

na.omit(data) %>% 
  group_by(VS,Estatus,Inst, Columna_S) %>% 
  summarise(media = mean(value), 
            desvio = sd(value),                             
            error_est = desvio / sqrt(n()),            
            intervalo_sup = media + (2*error_est),      
            intervalo_inf = media - (2*error_est)) -> stats

ggplot() +  
  geom_errorbar(
    data = stats,   
    aes(x = Columna_S,
        ymin = intervalo_inf,
        ymax = intervalo_sup,
        color = Estatus   
    ), width = 0.4 )+
  geom_point(data = stats,
             aes(x = Columna_S,
                 y = media,
             color = Estatus))+
  facet_grid(Inst ~ VS, scales = "free") +
  theme_classic()

However, instead of an independent point for each mean, I'd like to use geom_smooth to plot a line (plus standard error) that fits the means along the x-axis.

I have tried the code below, but it is not generating the desired outcome.

na.omit(data) %>% 
  ggplot(aes(x=Columna_S,y=value,colour=Estatus, na.rm = TRUE) ) +
  geom_smooth(aes(fill=Estatus,na.rm = TRUE)) +
  scale_y_continuous(breaks = seq(0,100, by=25), limits=c(0,100))+
  facet_grid(Institution~Value_system, scales = "free")+
  theme_classic()

StupidWolf

You have factors on the x-axis, I am not so sure it makes sense to put a smooth line through it, but if thats what you need, it goes like this:

data %>% 
filter(!is.na(Columna_S)) %>%
ggplot(aes(x=Columna_S,y=value,colour=Estatus)) +
geom_smooth(aes(group=Estatus)) +
facet_grid(Inst~VS, scales = "free")+
theme_classic()

You can consider putting a line through all the means:

data %>% 
filter(!is.na(Columna_S)) %>%
ggplot(aes(x=Columna_S,y=value,colour=Estatus)) +
stat_summary(aes(group=Estatus),fun=mean,geom="line") +
facet_grid(Inst~VS, scales = "free")+
theme_classic()

Collected from the Internet

Please contact [email protected] to delete if infringement.

edited at2021-04-7

Comments

0 comments

From Dev

Related Related

Article

Fitting a line to the mean values of a multilevel variable using geom_smooth

Fitting a line to the mean values of a multilevel variable using geom_smooth

Fitting with ggplot2, geom_smooth and nls

ggplot geom_smooth exclude negative values

ggplot geom_smooth exclude negative values

Is it possible to bypass stat_smooth when using geom_smooth?

Plotting using geom_smooth or stat_smooth

Plot dashed regression line with geom_smooth in ggplot2

Less smoothed line in ggplot2, alternatives to geom_smooth?

ggplot2 in R: fill underneath a geom_smooth line

Displaying geom_smooth() trend line from a specified x value

geom_smooth Match shaded area to line colour

ggplot2 in R: fill underneath a geom_smooth line

geom_smooth does not plot a line for my data frame

Labeling values in ggplot outside geom_smooth threshold

Why does geom_smooth() automatically excludes some values?

Is there any function to plot similar to geom_smooth() in Plotly using python?

Fitting a glm using variable as a column name in R

How to add manual colors for a ggplot2 (geom_smooth/geom_line)

geom-smooth: fitting the curve better to the points

ggplot2: fit geom_smooth() like categorical variable were continuous

Mixed fill color in ggplot2 legend using geom_smooth() in R

R : confidence interval being partially displayed with ggplot2 (using geom_smooth())

Linetype and Guide options for ggplot2 when using geom_smooth with continuous variables

what does a single variable line mean in javascript?

R - Multilevel Variable into Dummies

Find points over and under the confidence interval when using geom_stat / geom_smooth in ggplot2

geom_line does not generate lines using fun.y = mean as an argument

Visualizing longitudinal data with a trajectory/best-fitting mean growth curve and a spaghetti plot using R

Fitting smooth through xyplot

Fitting smooth through xyplot