Vamos a realizar un documento en Rmarkdown
Vamos a cargar los datos de departamentos
library(readxl)
Datos_departamentos <- read_excel("C:/Users/juand/OneDrive - PUJ Cali/Javeriana/4° semestre/Teoria de probabilidades/Ejercicios/Datos departamentos.xlsx")Los resultados nos muestran que
require (table1)
departamentos = data.frame (Datos_departamentos)
departamentos [,2] = as.numeric (departamentos [,2])
departamentos [,3] = as.numeric (departamentos [,3])
table1(~.,data = departamentos [,2:3])| Overall (N=33) |
|
|---|---|
| Departamento | |
| Mean (SD) | NA (NA) |
| Median [Min, Max] | NA [NA, NA] |
| Missing | 33 (100%) |
| Población.2023 | |
| Mean (SD) | 1590000 (1850000) |
| Median [Min, Max] | 1130000 [46800, 7970000] |