Skip to content

Commit

Permalink
Merge pull request #44 from eliansoutu/master
Browse files Browse the repository at this point in the history 
actualizo logos
  • Loading branch information
@eliansoutu
eliansoutu authored Dec 27, 2023
2 parents 4f789a0 + 2e8dce2 commit b95de2a
Show file tree
Hide file tree
Showing 4 changed files with 729 additions and 45 deletions.
89 changes: 47 additions & 42 deletions R/unir_paginas.R
View file
Original file line number Diff line number Diff line change
Expand Up @@ -24,27 +24,29 @@ unir_paginas <- function(input, save_as, topic, back_colour = "gris") {


if(Sys.info()["nodename"] != "dev-rstudio-vra-ubuntu") {
if (topic == "calidad") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/calidad_turistica_ct.pdf"
} else if(topic == "competitividad hotelera") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/competitividad_hotelera_ct.pdf"
} else if(topic == "eoh") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/encuesta_ocupacion_hotelera_ct.pdf"
} else if(topic == "sector hotelero") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/sector_hotelero_ct.pdf"
} else if(topic == "internacional") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_internacional_ct.pdf"
} else if(topic == "interno") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_interno_ct.pdf"
} else if(topic == "inversiones") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/inversiones_turisticas_ct.pdf"
} else if(topic == "naturaleza") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_naturaleza_ct.pdf"
} else if(topic == "naturaleza apn") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_naturaleza_apn_ct.pdf"
} else if(topic == "generico") {
topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/generico_st.pdf"
}
# if (topic == "calidad") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/calidad_turistica_ct.pdf"
# } else if(topic == "competitividad hotelera") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/competitividad_hotelera_ct.pdf"
# } else if(topic == "eoh") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/encuesta_ocupacion_hotelera_ct.pdf"
# } else if(topic == "sector hotelero") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/sector_hotelero_ct.pdf"
# } else if(topic == "internacional") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_internacional_ct.pdf"
# } else if(topic == "interno") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_interno_ct.pdf"
# } else if(topic == "inversiones") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/inversiones_turisticas_ct.pdf"
# } else if(topic == "naturaleza") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_naturaleza_ct.pdf"
# } else if(topic == "naturaleza apn") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/turismo_naturaleza_apn_ct.pdf"
# } else if(topic == "generico") {
# topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/generico_st.pdf"
# }

topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/segunda_hoja.pdf"

temp <- tempfile()

Expand All @@ -65,27 +67,29 @@ unir_paginas <- function(input, save_as, topic, back_colour = "gris") {

invisible(file.remove(c("cover.pdf","body.pdf",temp,temp_back)))
} else {
if (topic == "calidad") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/calidad_turistica_ct.pdf"
} else if(topic == "competitividad hotelera") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/competitividad_hotelera_ct.pdf"
} else if(topic == "eoh") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/encuesta_ocupacion_hotelera_ct.pdf"
} else if(topic == "sector hotelero") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/sector_hotelero_ct.pdf"
} else if(topic == "internacional") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_internacional_ct.pdf"
} else if(topic == "interno") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_interno_ct.pdf"
} else if(topic == "inversiones") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/inversiones_turisticas_ct.pdf"
} else if(topic == "naturaleza") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_naturaleza_ct.pdf"
} else if(topic == "naturaleza apn") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_naturaleza_apn_ct.pdf"
} else if(topic == "generico") {
topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/generico_st.pdf"
}
# if (topic == "calidad") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/calidad_turistica_ct.pdf"
# } else if(topic == "competitividad hotelera") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/competitividad_hotelera_ct.pdf"
# } else if(topic == "eoh") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/encuesta_ocupacion_hotelera_ct.pdf"
# } else if(topic == "sector hotelero") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/sector_hotelero_ct.pdf"
# } else if(topic == "internacional") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_internacional_ct.pdf"
# } else if(topic == "interno") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_interno_ct.pdf"
# } else if(topic == "inversiones") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/inversiones_turisticas_ct.pdf"
# } else if(topic == "naturaleza") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_naturaleza_ct.pdf"
# } else if(topic == "naturaleza apn") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/turismo_naturaleza_apn_ct.pdf"
# } else if(topic == "generico") {
# topic_path <- "/srv/shiny-server/recursos/hojas_institucionales/generico_st.pdf"
# }

topic_path <- "https://tableros.yvera.tur.ar/recursos/hojas_institucionales/segunda_hoja.pdf"

suppressWarnings(staplr::staple_pdf(input_files = c("cover.pdf",
topic_path,
Expand All @@ -95,6 +99,7 @@ unir_paginas <- function(input, save_as, topic, back_colour = "gris") {
"/srv/shiny-server/recursos/hojas_institucionales/contra_tapa.pdf")),
output_filepath = save_as))


invisible(file.remove(c("cover.pdf","body.pdf")))
}

Expand Down
682 changes: 681 additions & 1 deletion inst/resources/img/logo_pagedown.svg
View file
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified inst/resources/logo/escudo.png
View file
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
3 changes: 1 addition & 2 deletions inst/rmarkdown/templates/paged/skeleton/skeleton.Rmd
View file
Original file line number Diff line number Diff line change
Expand Up @@ -2,8 +2,7 @@
title: "Título del informe"
#subtitle: "Subtítulo del informe"
author: |
| Dirección Nacional de Mercados y Estadística
| **SUBSECRETARÍA DE DESARROLLO ESTRATÉGICO**
| Sistema de Información Turística de la Argentina
date: "acalafecha"
output:
comunicacion::template_informe
Expand Down

0 comments on commit b95de2a

Please sign in to comment.