Package 'comunicacion'

Title: DNMyE - Comunicación
Description: Herramientas para la comunicación de la Dirección Nacional de Mercados y Estadística de la Subsecretaría de Turismo de Argentina.
Authors: Pablo Tiscornia [aut], Juan Juara [aut], Elián Soutullo [aut], Juan Pablo Ruiz Nicolini [aut, cre] , Dirección Nacional de Mercados y Estadísticas Ministerio de Turismo y Deportes [cph]
Maintainer: Juan Pablo Ruiz Nicolini <[email protected]>
License: GPL (>= 3)
Version: 0.0.0.9011
Built: 2024-11-11 05:31:35 UTC
Source: https://github.com/dnme-minturdep/comunicacion

Help Index


Función para crear y abrir un template de informes para la DNMyE

Description

Función para crear y abrir un template de informes para la DNMyE

Usage

crear_informe(
  template = "skeleton.Rmd",
  save_as = template,
  data = list(),
  ignore = FALSE,
  open = TRUE,
  package = "comunicacion"
)

Arguments

template

Ruta donde se ubica el template de referencia

save_as

Ruta donde será guardado el nuevo informe creado

data

Una lista de 'data' que se le pasa al template

ignore

Si es TRUE, el nuevo archivo creado se incluye en .Rbuildignore. Por default, esta opción figura en FALSE

open

Si es TRUE se abre el archivo al mismo tiempo que se crea, para poder editarlo.

package

Nombre del paquete donde se encuentra el template.

Value

un vector lógico que indica si el archivo fue modificado

Examples

## Not run: 
  # Nota: Al correr la siguiente sentencia el archivo `informe.Rmd` se
  crear_informe(save_as = "informe.Rmd",
               open = TRUE)

## End(Not run)

Función para crear y abrir un template de presentaciones para la DNMyE

Description

Función para crear y abrir un template de presentaciones para la DNMyE

Usage

crear_presentacion(
  template = "skeleton.Rmd",
  save_as = template,
  data = list(),
  ignore = FALSE,
  open = TRUE,
  package = "comunicacion"
)

Arguments

template

Ruta donde se ubica el template de referencia

save_as

Ruta donde será guardado el nuevo informe creado

data

Una lista de 'data' que se le pasa al template

ignore

Si es TRUE, el nuevo archivo creado se incluye en .Rbuildignore. Por default, esta opción figura en FALSE

open

Si es TRUE se abre el archivo al mismo tiempo que se crea, para poder editarlo.

package

Nombre del paquete donde se encuentra el template.

Value

un vector lógico que indica si el archivo fue modificado

Examples

## Not run: 
  # Nota: Al correr la siguiente sentencia el archivo `presentacion.Rmd` se
  crear_informe(save_as = "presentacion.Rmd",
               open = TRUE)

## End(Not run)

Funcion para extraer la paleta institucional de la dnmye como colores hex

Description

Funcion para extraer la paleta institucional de la dnmye como colores hex

Usage

dnmye_colores(..., nombre = FALSE)

Arguments

...

Nombre o número del color. Las posibilidades son rosa, naranja, amarillo, pera, azul verde, purpura, cian, gris oscuro, gris medio y gris claro (o del 1 al 10).

nombre

Si es TRUE devuelve el nombre del color al que corresponde el código hex

Value

Paleta de colores institucionales para la Republica de Argentina

Examples

### Obtener el código hex del color institucional celeste
dnmye_colores()

dnmye_colores("rosa")

Funcion para extraer colores de la dnmye como colores hex

Description

Funcion para extraer colores de la dnmye como colores hex

Usage

dnmye_paletas(palette = "cualitativa", reverse = FALSE, ...)

Arguments

palette

Nombre de la paleta de colores en dnmye_paletas. Se puede optar por cualitativa, secuencial, dicotomica o divergente

reverse

TRUE indica que la peleta debe ser invertida

...

Argumentos adicionales para definir con colorRampPalette()

Value

Paleta de colores institucionales para la Republica de Argentina


Función para estilizar tablas gt con theme propio

Description

Función para estilizar tablas gt con theme propio

Usage

gt_theme_dnmye(gt_table, var_total = NA)

Arguments

gt_table

Tabla gt

var_total

Nombre de la variable que contiene la categoría "Total"


Función para formatear números decimales como texto

Description

Función para formatear números decimales como texto

Usage

lbl_decimal(x, decimales = 1)

Arguments

x

Número a formatear

decimales

Cantidad de decimales expresado como numero entero. El valor por default es 1 que recorta a 1 decimal.


Función para formatear números enteros como texto

Description

Función para formatear números enteros como texto

Usage

lbl_int(x)

Arguments

x

Número a formatear


Función para formatear números que expresan moneda como texto

Description

Función para formatear números que expresan moneda como texto

Usage

lbl_money(x, decimales = 0, dolar = F, escala = 1, sufijo = NULL)

Arguments

x

Número a formatear

decimales

Cantidad de decimales expresado como numero entero. El valor por default es 0 que no muestra decimales.

dolar

Lógico. Si es F (default) usa el prefijo '$', si es T usa prefijo 'US$'.

escala

Número entero para dividir el número a formatear. Por ejemplo, en caso de querer expresar el resultado en miles se pone 1000

sufijo

Texto a agregar como sufijo, por ejemplo 'M', 'm', etc. Default es NULL que no agrega sufijo.


Función para formatear números porcentuales como texto

Description

Función para formatear números porcentuales como texto

Usage

lbl_percent(x, decimales = 1)

Arguments

x

Número a formatear

decimales

Cantidad de decimales expresado como numero entero. El valor por default es 1 que recorta a 1 decimal.


Generacion automatica de tabs en Rmd

Description

Permite generar automáticamente el código necesario para agrupar múltiples fragmentos de Rmarkdown en pestañas. Concatena todos los fragmentos en una cadena que luego se puede knitear y renderizar. Tomado de sknifedatar

Usage

rmdautotabs(
  input_data,
  panel_name,
  ...,
  tabset_title = "",
  tabset_props = ".tabset-fade .tabset-pills",
  chunk_props = list(echo = FALSE, fig.align = "center"),
  is_output_distill = TRUE
)

Arguments

input_data

Ungrouped tibble with at least 2 columns, one for the title of the tabs and another with the output to be displayed.

panel_name

column with the ID variable.

...

nested columns that contain outputs to display

tabset_title

string title of the .tabset

tabset_props

string defining .tabset properties. Only works with is_output_distill = F

chunk_props

named list with additional parameters that correspond to all those available in rmarkdown chunks (fig.align, fig.width, ...).

is_output_distill

boolean. is output a distill article.


Constructor de escala de colores de contorno (color) para la dnmye

Description

Constructor de escala de colores de contorno (color) para la dnmye

Usage

scale_color_dnmye(
  palette = "cualitativa",
  discrete = TRUE,
  reverse = FALSE,
  ...
)

Arguments

palette

Nombre de la paleta de colores en dnmye_paleta

discrete

TRUE indica que la variable es discreta

reverse

TRUE indica que la peleta debe ser invertida

...

Argumentos adicionales para definir en discrete_scale() o scale_color_gradientn(), respectivamente, cuando discrete es TRUE o FALSE

Examples

library(ggplot2)
ggplot(iris, aes(Sepal.Width, Sepal.Length, color = Species)) +
geom_point(size = 4) +
scale_color_dnmye()

Constructor de escala de colores de contorno (color) para la dnmye

Description

Constructor de escala de colores de contorno (color) para la dnmye

Usage

scale_fill_dnmye(
  palette = "cualitativa",
  discrete = TRUE,
  reverse = FALSE,
  ...
)

Arguments

palette

Nombre de la paleta de colores en dnmye_paleta(). Las opciones son cualitativa (por default), secuencial, dicotomica y divergente

discrete

TRUE (por default) indica que la variable es discreta

reverse

TRUE invierte el orden de asignación de colores en la paleta

...

Argumentos adicionales para definir en discrete_scale() o scale_color_gradientn(), respectivamente, cuando discrete es TRUE o FALSE

Examples

datafile <- system.file("toy_evyth.rds", package = "comunicacion")
toy_evyth <- readRDS(datafile)

library(magrittr)
toy_evyth %>%
 dplyr::mutate(region_destino = factor(region_destino,
                                       labels = c("Ciudad de Buenos Aires",
                                                  "Provincia de Buenos Aires - Partidos del GBA",
                                                  "Provincia de Buenos Aires - Resto", "Centro",
                                                  "Litoral",
                                                  "Norte", "Cuyo", "Patagonia"))) %>%
 dplyr::group_by(anio, region_destino) %>%
 dplyr::summarise(cantidad_personas = sum(pondera)) %>%
 ggplot2::ggplot(ggplot2::aes(x = anio,
                              y = cantidad_personas,
                              fill = region_destino)) +
 ggplot2::geom_col(position = ggplot2::position_dodge()) +
 scale_fill_dnmye(palette = "cualitativa", discrete = TRUE)

Function for DNMYE pdf template

Description

Function for DNMYE pdf template

Usage

template_informe(
  logo = "0",
  front_img = "0",
  back_img = "0",
  img_to_dark = FALSE,
  logo_to_white = FALSE,
  other_css = NULL,
  ...
)

Arguments

Logo

front_img

Front cover image

back_img

Back cover image

img_to_dark

Darken image

logo_to_white

Tranform logo color to white - logo must be SVG

other_css

Add an other CSS

...

Arguments passed to pagedown::html_paged

Value

A pagedown template


Muestra no representativa (de "juguete) de la Encuesta de Viajes y Turismo de los Hogares (EVyTH-DNMyE).

Description

Base de datos con información del turismo interno (viajes y viajeros)

Usage

toy_evyth

Format

Un data frame con 5000 filas y 88 variables

Source

https://datos.yvera.gob.ar/dataset/encuesta-de-viajes-y-turismo-de-los-hogares-evyth-microdatos


Función para agregar hojas institucionales a los informes generados con el template de la DNMyE

Description

Función para agregar hojas institucionales a los informes generados con el template de la DNMyE

Usage

unir_paginas(input, save_as, topic = "generico")

Arguments

input

Ruta con el PDF del informe

save_as

Nombre y ruta del informe a guardar

topic

Tema del informe. Puede ser: "calidad", "competitividad hotelera", "eoh", "sector hotelero", "internacional", "interno", "inversiones", "naturaleza", "naturaleza apn" o "generico"

Examples

## Not run: 
  unir_paginas(input = "eoh.pdf",
   save_as = "informe_eoh_junio_2022.pdf",
   topic = "eoh"
 )

## End(Not run)