# LABORATORIO DIRIGIDO #1 - PREGUNTA 7
# ********************************
# se categoriza el vector y se muestra con la frecuencia, su
# resultado f se repite se repite 91 veces y m se repite 92 veces
genero <- factor(c(rep("f", 91), rep("m", 92)))
table(genero)
# se pide categorizar el vector en m y f, en este caso el
# resultado solo cambia el orden
genero <- factor(genero, levels=c("m", "f"))
table(genero)
# se pide caterogizar el vector M y f
# en M se muestra cero porque es está en mayúscula
# y f sigue mostrando 91 veces
genero <- factor(genero, levels=c("M", "f"))
table(genero)
# se limpia la variable genero
rm(genero)
