R/comparaVariablesCategoricas.R

In amanosalva/ByteAnalyticsUtils: Funciones para Análisis de datos - Byte

#Función que compara 3 gráficos para una variable categórica en los datasets prepago, postpago, control
comparaVariablesCategoricas <- function(nombreVariable, dataset_prepago, dataset_postpago, dataset_control){

  par(mfrow=c(3,1))

  barplot(table(dataset_prepago[names(dataset_prepago) == nombreVariable]))
  title(paste(nombreVariable," - Prepago"))
  barplot(table(dataset_postpago[names(dataset_postpago) == nombreVariable]))
  title(paste(nombreVariable," - Postpago"))
  barplot(table(dataset_control[names(dataset_control) == nombreVariable]))
  title(paste(nombreVariable," - Control"))


}