Generador de datos por grupo en Proyecto RCD II

generar-datos-grupo.R

# Cargar base de datos (requiere cargar tidyverse y readxl)
MK <- read_excel("NIELSEN01V2.xlsx")

# Escribir en la función set.seed() el código de cuatro dígitos asignado
# a tu grupo para obtener los datos que el grupo deber analizar

set.seed(CodigoGrupo)
p = 0.8  # Proporción de la muestra

BaseGrupo <- MK %>%
    sample_n(size = ceiling(p*nrow(MK)), replace = FALSE)