Este es el informe semanal del evento 356 para el Valle del Cauca, que contiene una exploración de las caracteristicas mas relevantes sociales, de tiempo y lugar.
Vamos a cargar la base de datos y presentar el total de registros de la tabla:
library(readxl)
suicidio = read_excel("D:/Alba Lucia Rodriguez N/2024/cursoR/YDRAY-2024_356_R.xlsx")
dim(suicidio)## [1] 1325 143Ahora vamos a describir las variables sexo,edad y estrato:
## Ajustar el estrato
suicidio$estrato_=as.factor(suicidio$estrato_)
## Ajustar estado civil
suicidio$estado_civ=factor(suicidio$estado_civ,labels = c("soltero","casado","unión libre","viudo","divorciado"))
## Ajustar escolaridad
suicidio$escolarid2=factor(suicidio$escolarid,levels = c(1,2,3,5,7,8,9,10,11,12,13,14),labels = c("preescolar","primaria","secundaria","tecnica","tecnica","tecnica","profesional","postgrado","postgrado","postgrado","ninguno","sin información"))
require(table1)## Cargando paquete requerido: table1##
## Adjuntando el paquete: 'table1'## The following objects are masked from 'package:base':
##
## units, units<-table1(~sexo_+edad_+estrato_+estado_civ,data=suicidio)| Overall (N=1325) |
|
|---|---|
| sexo_ | |
| F | 858 (64.8%) |
| M | 467 (35.2%) |
| edad_ | |
| Mean (SD) | 25.8 (12.6) |
| Median [Min, Max] | 22.0 [8.00, 90.0] |
| estrato_ | |
| 1 | 282 (21.3%) |
| 2 | 636 (48.0%) |
| 3 | 240 (18.1%) |
| 4 | 61 (4.6%) |
| 5 | 35 (2.6%) |
| 6 | 14 (1.1%) |
| Missing | 57 (4.3%) |
| estado_civ | |
| soltero | 978 (73.8%) |
| casado | 84 (6.3%) |
| unión libre | 224 (16.9%) |
| viudo | 13 (1.0%) |
| divorciado | 26 (2.0%) |