R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

#resumen de datos:

#resumen de datos 2019 en función alumnos matrículados por campo de estudio

universidades <- c("Universidad Autónoma de Barcelona", "Universidad de Barcelona", "Universidad Politécnica de Cataluña", "Universidad Pompeu Fabra", "Universidad de Girona", "Universidad de Lleida", "Universidad Rovira i Virgili", "Universidad Ramon Llull", "Universidad de Vic-Universidad Central de Cataluña", "Universidad Internacional de Cataluña", "Universidad Abat Oliba CEU", "Universidad Abierta de Cataluña")
tabla_resumen_2019 <- datos_de_alumnos_matriculados_2019 %>%
  filter(datos %in% universidades) %>%
  summarise(Total_Artes_y_Humanidades_2019 = sum(Artes_y_Humanidades_2019), 
            Total_Ciencias_2019 = sum(Ciencias_2019), 
            Total_Ciencias_de_la_salud_2019 = sum(Ciencias_de_la_salud_2019), 
            Total_Ciencias_Sociales_y_jurídicas_2019 = sum(Ciencias_Sociales_y_jurídicas_2019), 
            Total_Ingeniería_y_arquitectura_2019 = sum(Ingeniería_y_arquitectura_2019), 
            promedio_Artes_y_Humanidades_2019 = mean(Artes_y_Humanidades_2019), 
            promedio_Ciencias_2019 = mean(Ciencias_2019), 
            promedio_Ciencias_de_la_salud_2019 = mean(Ciencias_de_la_salud_2019), 
            promedio_Ciencias_Sociales_y_jurídicas_2019 = mean(Ciencias_Sociales_y_jurídicas_2019), 
            promedio_Ingeniería_y_arquitectura_2019 = mean(Ingeniería_y_arquitectura_2019), 
            desv_tip_Artes_y_Humanidades_2019 = sd(Artes_y_Humanidades_2019), 
            desv_tip_Ciencias_2019 = sd(Ciencias_2019), 
            desv_tip_Ciencias_de_la_salud_2019 = sd(Ciencias_de_la_salud_2019), 
            desv_tip_Ciencias_Sociales_y_jurídicas_2019 = sd(Ciencias_Sociales_y_jurídicas_2019), 
            desv_tip_Ingeniería_y_arquitectura_2019 = sd(Ingeniería_y_arquitectura_2019))

# Mostrar la tabla resultante
tabla_resumen_2019
#resumen de datos 2020 en función alumnos matrículados por campo de estudio
universidades <- c("Universidad Autónoma de Barcelona", "Universidad de Barcelona", "Universidad Politécnica de Cataluña", "Universidad Pompeu Fabra", "Universidad de Girona", "Universidad de Lleida", "Universidad Rovira i Virgili", "Universidad Ramon Llull", "Universidad de Vic-Universidad Central de Cataluña", "Universidad Internacional de Cataluña", "Universidad Abat Oliba CEU", "Universidad Abierta de Cataluña")
tabla_resumen_2020 <- datos_de_alumnos_matriculados_2020 %>%
  filter(datos %in% universidades) %>%
  summarise(Total_Artes_y_Humanidades_2020 = sum(Artes_y_Humanidades_2020),
            Total_Ciencias_2020 = sum(Ciencias_2020),
            Total_Ciencias_de_la_salud_2020 = sum(Ciencias_de_la_salud_2020),
            Total_Ciencias_Sociales_y_jurídicas_2020 = sum(Ciencias_Sociales_y_jurídicas_2020),
            Total_Ingeniería_y_arquitectura_2020 = sum(Ingeniería_y_arquitectura_2020),
            promedio_Artes_y_Humanidades_2020 = mean(Artes_y_Humanidades_2020),
            promedio_Ciencias_2020 = mean(Ciencias_2020),
            promedio_Ciencias_de_la_salud_2020 = mean(Ciencias_de_la_salud_2020),
            promedio_Ciencias_Sociales_y_jurídicas_2020 = mean(Ciencias_Sociales_y_jurídicas_2020),
            promedio_Ingeniería_y_arquitectura_2020 = mean(Ingeniería_y_arquitectura_2020),
            desv_tip_Artes_y_Humanidades_2020 = sd(Artes_y_Humanidades_2020),
            desv_tip_Ciencias_2020 = sd(Ciencias_2020),
            desv_tip_Ciencias_de_la_salud_2020 = sd(Ciencias_de_la_salud_2020),
            desv_tip_Ciencias_Sociales_y_jurídicas_2020 = sd(Ciencias_Sociales_y_jurídicas_2020),
            desv_tip_Ingeniería_y_arquitectura_2020 = sd(Ingeniería_y_arquitectura_2020))
#Mostrar la tabla resultante
tabla_resumen_2020
#resumen de datos 2021 en función alumnos matrículados por campo de estudio
universidades <- c("Universidad Autónoma de Barcelona", "Universidad de Barcelona", "Universidad Politécnica de Cataluña", "Universidad Pompeu Fabra", "Universidad de Girona", "Universidad de Lleida", "Universidad Rovira i Virgili", "Universidad Ramon Llull", "Universidad de Vic-Universidad Central de Cataluña", "Universidad Internacional de Cataluña", "Universidad Abat Oliba CEU", "Universidad Abierta de Cataluña")
tabla_resumen_2021 <- datos_de_alumnos_matriculados_2021 %>%
  filter(datos %in% universidades) %>%
  summarise(Total_Artes_y_Humanidades_2021 = sum(Artes_y_Humanidades_2021),
            Total_Ciencias_2021 = sum(Ciencias_2021),
            Total_Ciencias_de_la_salud_2021 = sum(Ciencias_de_la_salud_2021),
            Total_Ciencias_Sociales_y_jurídicas_2021 = sum(Ciencias_Sociales_y_jurídicas_2021),
            Total_Ingeniería_y_arquitectura_2021 = sum(Ingeniería_y_arquitectura_2021),
            promedio_Artes_y_Humanidades_2021 = mean(Artes_y_Humanidades_2021),
            promedio_Ciencias_2021 = mean(Ciencias_2021),
            promedio_Ciencias_de_la_salud_2021 = mean(Ciencias_de_la_salud_2021),
            promedio_Ciencias_Sociales_y_jurídicas_2021 = mean(Ciencias_Sociales_y_jurídicas_2021),
            promedio_Ingeniería_y_arquitectura_2021 = mean(Ingeniería_y_arquitectura_2021),
            desv_tip_Artes_y_Humanidades_2021 = sd(Artes_y_Humanidades_2021),
            desv_tip_Ciencias_2021 = sd(Ciencias_2021),
            desv_tip_Ciencias_de_la_salud_2021 = sd(Ciencias_de_la_salud_2021),
            desv_tip_Ciencias_Sociales_y_jurídicas_2021 = sd(Ciencias_Sociales_y_jurídicas_2021),
            desv_tip_Ingeniería_y_arquitectura_2021 = sd(Ingeniería_y_arquitectura_2021))
#Mostrar la tabla resultante
tabla_resumen_2021

Including Plots

You can also embed plots, for example:

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.