opadar: Useful functions for the daily operations of the OPADA, UPCT.

Description Usage Arguments Value Examples

Combina diferentes funciones de openxlsx para, dado un workbook, crear una hoja, escribir un t<c3><ad>tulo, escribir un dataframe en el workbook en un <c3><ba>nico paso. Permite tambi<c3><a9>n la combinaci<c3><b3>n (merge) de celdas verticales consecutivas que contienen el mismo valor, para mejorar la presentaci<c3><b3>n de tablas. Combina bien con el "pipe operator" de magrittr, tal como queda ilustrado en la vignette.

1
2
3

escribirTablaDatos(wb, sheetName, x, titulo = NULL, titleStyle = "defecto",
  headerStyle = "defecto", areaTitulo = "A1:C1", upperleftCell = NULL,
  spanColumns = NULL, transpose = FALSE, colNames = colnames(x), ...)

`wb`	El workbook que ser<c3><a1> modificado.
`sheetName`	String. El nombre de la hoja donde se debe escribir el dataframe `x`. Si no existe en el workbook, ser<c3><a1> creada.
`x`	dataframe. El dataframe que se escribir<c3><a1> en el workbook.
`titulo`	String. El texto que se coloca encima del dataframe en el workbook. Si no se desea ning<c3><ba>n t<c3><ad>tulo, es suficiente con no especificarlo, el defecto de este argumento siendo `NULL`.
`titleStyle`	El estilo que se desea usar para `titulo`. Debe haber sido creado con `openxlsx::createStyle`. Si no se especifica, se usa un estilo con `fontsize = 12`, `textDecoration = c("bold", "italic")`, `valign = "center"` y `halign = "center"`.
`headerStyle`	El estilo que se desea usar para la cabecera del dataframe `x`. Debe haber sido creado con `openxlsx::createStyle`. Si no se especifica, se usa un estilo con color de fuente blanco y fondo azul, adem<c3><a1>s de `textDecoration = "Bold"`, `valign = "center"` y `halign = "center"`.
`areaTitulo`	String. La especificaci<c3><b3>n formato Excel del <c3><a1>rea rectangular que debe ocupar el t<c3><ad>tulo en la hoja. Se combinar<c3><a1>n todas las celdas del <c3><a1>rea. Por defecto es "A1:C1", es decir las tres primeras celdas de la primera fila.
`upperleftCell`	String. La especificaci<c3><b3>n formato Excel de la celda superior izquierda del <c3><a1>rea donde se escribir<c3><a1> el dataframe `x`. Por defecto, es dos filas m<c3><a1>s abajo que la esquina izquierda inferior del t<c3><ad>tulo.
`spanColumns`	String. Permite combinar celdas verticales consecutivas si contienen el mismo valor, para mejorar el aspecto de tablas por ejemplo. Es un vector construido a partir de los nombres de columnas de `x` en las que hay que combinar celdas verticales consecutivas iguales. Si `x` es un dataframe con columnas `profesor`,`sexo`, `asignatura`, por ejemplo, si `spanColumn = c("profesor;sexo", "asignatura")`, quiere decir que `profesor` y `sexo` tienen la misma estructura de combinaci<c3><b3>n, determinada por `profesor` (`sexo` "hereda" de las combinaciones verticales determinadas por `profesor`. `asignatura` tiene su propio estructura de combinaci<c3><b3>n vertical, pero est<c3><a1> supedita a las combinaciones de `profesor`. Ver la vignette para m<c3><a1>s explicaciones y ejemplos.
`transpose`	Logical. Indica si se quiere escribir el dataframe transpuesto.
`colNames`	String o Logical. Si es FALSE, no se escriben el nombre de las columnas del dataframe. Si es un vector de caracteres de la misma longitud que el n<c3><ba>mero de columnas de `x`, se usan este vector para escribir.

Un workbook que es invisible.

library("magrittr")
library("openxlsx")
opada <- data.frame(Nombre = c("<c3><81>lvaro", "Antonio", "Mari Carmen",
                               "Mathieu"),
                   Sexo = c("Hombre", "Hombre", "Mujer", "Hombre"),
                     Edad = c(25, 25, 23, 25),
                     Nacionalidad = c("720", "720", "720", "250")) 

## Escribimos en un fichero
## Not run: 
createWorkbook() %>%
     escribirTablaDatos(createWorkbook(),
                        sheetName = "La OPADA",
                        x = opada,
                        titulo = "Miembros de la OPADA",
                        areaTitulo = "A2:D2",
                        withFilter = FALSE) %>%
     saveWorkbook("ejemplo.xlsx", overwrite = TRUE)

## End(Not run)
## Para m<c3><a1>s ejemplos, ver la vignette