_instrucciones.R

# previsualizar sitio
blogdown::serve_site()
blogdown::stop_server()
blogdown::build_site()
servr::httr("public")

# source("R/funciones.R")

## publicaciones ----

# editar el más reciente
abrir_publicacion_reciente("creado", cantidad = 6)
abrir_publicacion_reciente("modificado", cantidad = 6)

# trabajar en borradores
abrir_borradores(cantidad = Inf)


## crear ----

# crear un post normal
crear_publicacion(
  title = "¿Cuántos días faltan para el dieciocho?",
  file = paste0("blog/", lubridate::today(), "/index.qmd"),
  tags = c("fechas", "curiosidades")
)

# crear un post con nombre
crear_publicacion(
  title = "Exporta tablas hechas con `{gt}` a formato Excel",
  file = "blog/tablas_gt_excel/index.qmd",
  tags = c("tablas"),
  categories = c()
)


# ideas ----
# convertir "content/blog/tablas_gt/index.qmd" en tutorial con instrucciones y tips
# completar "content/blog/mapas_mapgl/index.qmd"
# falta st_union en /blog/mapas_sf
# actualizar "content/blog/excel_openxlsx/index.qmd"
# post sobre temas nuevos, con fotos
# generar html con R (usar ejemplos del post de colores)
# agregar usos de {territorial} a posts
# hacer que R te pregunte cosas
# How do I replace NA values with zeros in an R dataframe?
# tip shiny actualizar css
# {futurize} https://www.jottr.org/2026/01/22/futurize-0.1.0/
# mapas de chile con comunas pero sin líneas en la costa
# pildoritas en shiny y en ggiraph
# tablas gt con flechitas
# datos de género en chile (mmeg, subcomisión, datos.gob, red chilena, ibg)
# https://www.linkedin.com/feed/update/urn:li:activity:7405241344316841984?utm_source=share&utm_medium=member_desktop&rcm=ACoAAB9if5MBe0keh4VrsmJOFbZxmIK9T9GSkYM
"content/blog/dt_tablas/index.qmd"
"https://cran.r-project.org/web/packages/janitor/vignettes/tabyls.html" # plagiar
"https://github.com/rundel/livecode"

# constantes
"content/blog/mapas_sf/mapas_sf.qmd"
"content/blog/git_comandos/index.md"
"content/blog/r_introduccion/recursos_r/index.md" # enlaces


## shortcodes ----

# {{< indice >}}
# {{< cafecito >}}
# {{< cursos >}}
# {{< bajada "x" >}}
# {{< imagen "x" >}}
# {{< imagen_tamaño "x" "300px" >}}
# {{< video "x" >}}
# {{< aviso "x" >}}
# {{< info "x" >}}
# {{< detalles "Hola" >}} {{< /detalles >}}

# {{< boton "Buscador" "https://bastianoleah.shinyapps.io/buscador/" "fas fa-search" >}}
# {{< boton "Desacargar datos" "https://bastianoleah.shinyapps.io/buscador/" "fas fa-file-download" >}}
# {{< relacionada "blog/estudio_brechas_comunales/" >}}
# {{< etiqueta "apps" >}}
# {{< categoria "Tutoriales" "Más tutoriales de R" >}}
# {{< externo "Galería de apps Shiny"
#   "https://bastianolea.github.io/shiny_apps/"
#   "shiny_apps.png"
#   "Descripción"
#   "Página recomendada" >}}

# íconos
# <i class='fas fa-chalkboard-user'></i>
# <i class='fas fa-chalkboard-user' style='font-size: 200%'></i>

# destacar código
# ```r {hl_lines=["5-9"]}

## archivos ----
"content/blog/r_introduccion/recursos_r/index.md" # páginas
"assets/tema-morado-hex.scss" # tema
"config.toml" # configuración

"layouts/index.html" #index
"layouts/partials/shared/summary.html" # posts individuales en página de blog
"layouts/partials/shared/summary-thumbnail.html" # posts individuales en las páginas de cada tag
"layouts/blog/single-sidebar.html" # html de los post
"layouts/taxonomy/taxonomy.html" # html de la página de tags (/tags/)

"layouts/index.json" # genera el sitio en JSON para el buscador (el archivo queda en public como index.json)
"layouts/partials/shared/sidebar/sidebar-header.html" # sidebar del blog

"assets/custom.scss" # css del sitio
"static/css/syntax.css" # css del syntax highlight

"static/_redirects" # redirección de posts con cambio de nombre


## utilidades ----

# convertir script a Quarto
convertr::r_to_qmd(
  input_dir = "~/Documents/Clases R/Clases SpatialLab/Cursos/curso_intro/nivel_3-visualizaciones/clase_2.R",
  output_dir = "content/blog/tutorial_visualizacion_ggplot/clase_2.qmd"
)


# ver en github
usethis::browse_github()

## antes de publicar (git push) ----

# Netlify compila con `hugo` directo (ver netlify.toml) sobre los .md ya
# commiteados: NO corre R ni build_site(), así que los enlaces internos que
# Quarto reescribe (/seccion/ -> ./seccion/) deben corregirse ANTES del push,
# o quedarán rotos (404) en producción. Ver skill hugo-blog.
source("R/funciones.R")
corregir_enlaces_qmd() # corrige ./seccion/ -> /seccion/ en los index.md
revisar_enlaces_qmd() # verifica que no queden enlaces rotos