Reportería dinámica y visualización con R

rusersgroup.com

1. Data products: Introducción y tipos.
2. Investigación reproducible con Markdown.
3. Limpieza, procesamiento, análisis y reportería automática (Windows y Linux).
4. Aplicaciones web con shiny, shinydashboard y flexdashboard.
5. RStudio Server y Shiny Server.
6. Reactivos y condicionales.
7. Integración con bases de datos Postgres y MySQL.
   
   
   Bibliografía recomendada: Developing Data Products in R, Brian Caffo and Sean Kross
   

1. Data products:

Introducción y tipos.

Productos de datos son el resultado de un análisis de datos.

• Tabla
• Gráfico
• Informe
• Presentación
• Sitios web de análisis interactivo

Ejemplo:

Un análisis de datos podría generar algoritmo que calcule un score para un grupo de posibles clientes.

Producto de datos:

• Tabla con resultado
• Reporte que muestre este resultado y su forma de cálculo
• Aplicación que incorpore ese algoritmo en un sitio web para que los usuarios puedan introducir datos de nuevos clientes y obtengan su score.

Estáticos

Productos que no permiten modificar tipo de visualización

• Informe
• Presentación
• Tabla

Dinámicos

Productos que permiten modificar el tipo de visualización, además de cambiar el tipo de gráfico, permiten añadir nuevas variables, nuevos registros, realizar filtros, actualizar y consolidar los resultados, etc.

• Aplicaciones de control, consulta, captura y visualización de información.

Potencial y ventajas de R se incorporan directamente a nuestros productos de datos.

Facilidad, dentro de lo necesario para desarrollar productos de datos se incluye HTML, Javascript, D3, Web Services, etc. etc.

library(xlsx)
exportar <- function(datos, archivo){        
  wb <- createWorkbook(type="xlsx")
  # Estilos de celdas
  # Estilos de titulos y subtitulos
  titulo <- CellStyle(wb)+ Font(wb,  heightInPoints=16, isBold=TRUE)
  subtitulo <- CellStyle(wb) + Font(wb,  heightInPoints=12,
                                          isItalic=TRUE, isBold=FALSE)
  # Estilo de tablas
  filas <- CellStyle(wb) + Font(wb, isBold=TRUE)
  columnas <- CellStyle(wb) + Font(wb, isBold=TRUE) +
    Alignment(vertical="VERTICAL_CENTER",wrapText=TRUE, horizontal="ALIGN_CENTER") +
    Border(color="black", position=c("TOP", "BOTTOM"), 
           pen=c("BORDER_THICK", "BORDER_THICK"))+Fill(foregroundColor = "lightblue", pattern = "SOLID_FOREGROUND")
  # Crear una hoja
  sheet <- createSheet(wb, sheetName = "Información - R Users Group - Ecuador")
  # Funcion linea (agregar texto)
  linea<-function(sheet, rowIndex, title, titleStyle){
    rows <- createRow(sheet, rowIndex=rowIndex)
    sheetTitle <- createCell(rows, colIndex=1)
    setCellValue(sheetTitle[[1,1]], title)
    setCellStyle(sheetTitle[[1,1]], titleStyle)
  }
  # Agregamos titulos,  subtitulos, etc.
  linea(sheet, rowIndex=8, 
                title=paste("Fecha:", format(Sys.Date(), format="%Y/%m/%d")),
                titleStyle = subtitulo)
  linea(sheet, rowIndex=9, 
                title="Elaborado por: R Users Group - Ecuador",
                titleStyle = subtitulo)
  linea(sheet, rowIndex=11, 
                paste("Información de prueba"),
                titleStyle = titulo)
  # Tablas
  addDataFrame(datos,
               sheet, startRow=13, startColumn=1,
               colnamesStyle = columnas,
               rownamesStyle = filas,
               row.names = F)
  # Ancho de columnas
  setColumnWidth(sheet, colIndex=c(1:ncol(datos)), colWidth=15)
  # Imagen    Cambia la ruta por la que de tu imagen
  addPicture("C:/final5x5.png", sheet, scale=0.75, startRow = 1, startColumn = 1)
  # Guardar
  saveWorkbook(wb, archivo)
}
exportar(mtcars, "R Users Group - Ecuador - mtcars.xlsx")

Gráficos dinámicos

Presentación actual

Presentación BI - R Users Group - Ecuador

rusersgroup BI

Dashboard reactivos - R Users Group - Ecuador

app demo reactivos rusersgroup

Web oficial - R Users Group - Ecuador

rusersgroup.com

Análisis completamente replicable -captura de datos, limpieza, procesamiento y resultados-.

Debe incluir descripción, objetivos, etc.

rpubs.com

Markdown es un lenguaje de marcado ligero parecido al que se emplea en muchas wikis y basado originalmente en convenciones existentes en el marcado de los correos electronicos. Emplea texto plano, procurando que sea legible pero consiguiendo que se convierta en XHTML correctamente formateado.

rpresenter básico - rusersgroup

Guía completa markdown y su integración con R - rusersgroup

Guía R Markdown - R Studio

Comprensión y práctica

Ejecución programada de scripts R.

Rscript.exe --vanilla --save script.r

Windows - batch y tareas automáticas

"C:\Program Files\R\R-3.4.1\bin\Rscript.exe"     --vanilla --save "C:\automaticos\script.r"

Linux - crontab

30 20 * * * R CMD BATCH /automaticos/script.r

Shiny es una paquete de R con el cual podemos crear aplicaciones web interactivas (apps) que permiten a los usuarios interactuar con sus datos sin tener que manipular el código.

No hace falta conocimiento de HTML o JavaScript, solo conocer R.

install.packages("shiny")
library(shiny)

La aplicación tiene 3 componentes:

UI : Interfaz de usuario, controla el diseño, entradas y salidas de la aplicación.
SERVER : Fuciones, cálculos, resultados, etc., contiene las instrucciones necesarias para el funcionamiento de la aplicación.
GLOBAL : Data - puede omitirse y colocarse antes del resto de componentes.