source('C:/Users/rober/Documents/R/ts.brb.test/Rprofile.site')
==========================
Motor Barbwin8 cargado
==========================
source('C:/Users/rober/Documents/R/ts.brb.test/functions.R')
# 1. Datos de prueba
data <- expss::read_spss('data/datos_ejemplo.sav')