Para conocer el contendio que hay en el objeto datos, simplemente escribo datos

library(readxl)
hoja_malvon <- read_excel("hoja_malvon.xlsx")

Para conocer la proporción de alumnos que estudian en cada Universidad (Frecuencia Absoluta) utilizo la función “table””

Fre_abs<-table(hoja_malvon$Sanidad)
Fre_abs
## 
##              enferma medianamente enferma                 sana 
##                   44                  108                  348

Si quisiera conocer el tamaño de la muesta (n) utilizo la funcion “length”

n<-length(hoja_malvon$Sanidad)

El tamaño de la muestra es de 32 estudiantes

Para conocer la frecuencia relativa utilizo la función “prop.table”

Fre_rel<-prop.table(table(hoja_malvon$Sanidad))
Fre_rel
## 
##              enferma medianamente enferma                 sana 
##                0.088                0.216                0.696

Para conocer la frecuencia relativa porcentual simplemente multiplico por 100

Fre_por<-prop.table(table(hoja_malvon$Sanidad))*100
Fre_por
## 
##              enferma medianamente enferma                 sana 
##                  8.8                 21.6                 69.6
fabsacum<-cumsum(Fre_abs)
fabsacum
##              enferma medianamente enferma                 sana 
##                   44                  152                  500
tablafrecuencias<-cbind(Fre_abs, Fre_rel,Fre_por,fabsacum)
tablafrecuencias
##                      Fre_abs Fre_rel Fre_por fabsacum
## enferma                   44   0.088     8.8       44
## medianamente enferma     108   0.216    21.6      152
## sana                     348   0.696    69.6      500

La razón de variación es:

razon<-(n-348)/n
razon
## [1] 0.304

La razión de variación es la proporción de individuos que No pertenecen a la moda. En este caso casi el 60 % de los individuos no va a la Universidad Maza. Nos da una idea de la variación de los datos

Para visualizar los datos puedo utilizar un diagrama de torta o un diagrama de barras

Para realizar el diagrama de tortas sobre la frecuencias absolutas utilizo la función “pie”. Del mismo modo puedo hacer el gráfico de tortas para cada una de las frecuencias.

pie(Fre_abs)

Es importante poner los títulos en los gráficos

pie(Fre_abs,main = "Frecuencia absoluta")

Si quisiera cambiar el tamaño de las letra utilizo la función “cex”

pie(Fre_abs,main = "Frecuencia absoluta", cex=3)

Si quisiera cambiar los colores

pie(Fre_abs,main = "Frecuencia absoluta", col=c("green", "black","white", "yellow"))

También puedo construir un gráfico de barras y puedo modificar el gráfico al igual que con el gráfico de torta

barplot(Fre_por)

barplot(Fre_por, main="Porcentaje de alumnos que asisten a las distintas universidades", col=c("green", "blue","red","skyblue"))

barplot(Fre_por, main="Porcentaje de alumnos que asisten a las distintas universidades", col=c("green", "blue","red","skyblue"), horiz = TRUE)