4-plot-gender-diff

# Seteo de sesión

#install.packages("pacman")
library(pacman)

Warning: package 'pacman' was built under R version 4.4.3

pacman::p_load(
  dplyr, haven, sjlabelled,  psych,  purrr,  tidyr,  sjPlot,  ggplot2, ggbeeswarm,
  parameters,  table1,  car,  beeswarm,  lme4, scales, ggrepel, corrplot,
  ggtext, patchwork, lavaan, semTools, DT, knitr, kableExtra)

options(scipen = 999)

rm(list = ls()) 

icils23_proc <- readRDS(here::here("~/GitHub/milenio_nudos/picils_dse/input/data/proc_data/icils23_proc.rds"))
pisa22ict <- readRDS(here::here("input/data/proc_data/pisa22_proc.rds"))

Create index

pisa22ict <- pisa22ict |>
  mutate(
    effgen = rowMeans(across(c(search_info, evaluate_info, collect_data, 
                               explain_content, share_content, pair_collab,
                               write_text,create_media, change_settings)), 
                      na.rm = TRUE),
    effspec = rowMeans(across(c(programming, develop_webpage)), 
                       na.rm = TRUE)
  )

icils23_proc <- icils23_proc|>
  mutate(
    effgen = rowMeans(across(c(search_info, source_info, evaluate_info, install_app,
                               share_content, write_text,
                               create_media, insert_image, edit_image)), 
                      na.rm = TRUE),
    effspec = rowMeans(across(c(programming, visual_coding, develop_webpage)), 
                       na.rm = TRUE)  
  )

Country Differences

Gender Differences by country