library(tidyverse)

mortalidad <- read.csv('https://raw.githubusercontent.com/Demzayat/investigacion_empirica/refs/heads/main/mortalidad2024.csv')
names(mortalidad)
## [1] "comuna" "tasa"
dim(mortalidad)
## [1] 15  2
summary(mortalidad)
##      comuna          tasa      
##  Min.   : 1.0   Min.   :0.000  
##  1st Qu.: 4.5   1st Qu.:3.200  
##  Median : 8.0   Median :5.500  
##  Mean   : 8.0   Mean   :4.833  
##  3rd Qu.:11.5   3rd Qu.:6.300  
##  Max.   :15.0   Max.   :8.900