## ----eval=FALSE---------------------------------------------------------------
# library(pulso)
# tpm_2024 <- pulso_tpm(start = "2024-01-01", end = "2024-12-31")
# head(tpm_2024)

## ----eval=FALSE---------------------------------------------------------------
# # Force fixture (no network required)
# tpm_all <- pulso_tpm(use_fixture = TRUE)
# range(tpm_all$fecha)