categorias_pregunta_formato: Formato categorías respuestas para preguntas múltiples y...

View source: R/categorias_pregunta_formato.R

categorias_pregunta_formatoR Documentation

Formato categorías respuestas para preguntas múltiples y categóricas

Description

Crea un vector para las respuestas de las preguntas múltiples y categóricas.

Usage

categorias_pregunta_formato(
pregunta,
diseño,
datos,
DB_Mult,
tipo_pregunta,
metricas = TRUE
)

Arguments

pregunta

Nombre de la pregunta sobre la cual se desea obtener las categorías

diseño

Diseño muestral que se ocupará según el tipo de pregunta

datos

Conjunto de datos en formato .sav

DB_Mult

Data frame con las preguntas múltiples

tipo_pregunta

Tipo de pregunta: 'categorica', 'multiple', 'continua'

metricas

Valor lógica que indica si se desean las categorías de las respuestas para las métricas media,ímite inferior, límite superior o para las métricas error estándar, varianza, coeficiente de variación y el efecto de diseño

Value

Vector con las categorías de las respuestas de la pregunta mecionada por el usuario, si métricas = TRUE se regresa un vector con las categorías y entre cada categoría se encuentran dos NA's,

si metricas = FALSE se regresa un vector con las categorías de las respuestas y entre cada categoría se encuentran 3 NA's

Author(s)

Bringas Arturo, Rosales Cinthia, Salgado Iván, Torres Ana

Examples

## Not run: 
# Carga de datos
dataset <- read.spss("data/BASE_CONACYT_260118.sav", to.data.frame = TRUE)
Lista_Preg <- read_xlsx("aux/Lista de Preguntas.xlsx",
  sheet = "Lista Preguntas"
)$Nombre %>% as.vector()
DB_Mult <- read_xlsx("aux/Lista de Preguntas.xlsx",
  sheet = "Múltiple"
) %>% as.data.frame()

# Diseño
disenio_mult <- disenio(id = c(CV_ESC, ID_DIAO), estrato = ESTRATO, pesos = Pondi1, reps = FALSE, datos = dataset)

categorias_pregunta_formato(pregunta = "P1", diseño = disenio_mult, datos = dataset, DB_Mult = DB_Mult, tipo_pregunta = "multiple", metricas = TRUE)

## End(Not run)

Acturio/rsrvyest documentation built on June 14, 2022, 7:30 p.m.