Commit c31291b2 authored by Laurent Gatto's avatar Laurent Gatto

remove script

parent f1442463
library("rWSBIM1207")
library("tidyverse")
f <- interroA.csv()
read_csv(f) %>%
group_by(gender) %>%
summarise(mean_1 = mean(interro1, na.rm = TRUE))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment