Title: | Load Data for Analysis System |
---|---|
Description: | Provides a framework to load text and excel files through a 'shiny' graphical interface. It allows renaming, transforming, ordering and removing variables. It includes basic exploratory methods such as the mean, median, mode, normality test, histogram and correlation. |
Authors: | Oldemar Rodriguez [aut, cre], Diego Jiménez [aut], Joseline Quirós [aut] |
Maintainer: | Oldemar Rodriguez <[email protected]> |
License: | GPL (>= 2) |
Version: | 1.3.0 |
Built: | 2024-10-25 05:30:45 UTC |
Source: | CRAN |
Load data from text file.
carga.datos( nombre.filas = TRUE, ruta = NULL, separador = ";", sep.decimal = ",", encabezado = TRUE, deleteNA = TRUE, preview = FALSE )
carga.datos( nombre.filas = TRUE, ruta = NULL, separador = ";", sep.decimal = ",", encabezado = TRUE, deleteNA = TRUE, preview = FALSE )
nombre.filas |
a logical value indicating whether the file contains the names of the rows as its first column. |
ruta |
the name of the file which the data are to be read from. |
separador |
the field separator character. |
sep.decimal |
the character used in the file for decimal points. |
encabezado |
a logical value indicating whether the file contains the names of the variables as its first line. |
deleteNA |
a logical value indicating if rows with NA should be removed. |
preview |
a logical value indicating if only load the first 10 rows. |
A data.frame object with the information of a file.
Diego Jimenez <[email protected]>
tf <- tempfile() write.table(iris, tf, sep = ";", dec = ",", row.names = FALSE) carga.datos(ruta = tf, nombre.filas = FALSE, preview = TRUE)
tf <- tempfile() write.table(iris, tf, sep = ";", dec = ",", row.names = FALSE) carga.datos(ruta = tf, nombre.filas = FALSE, preview = TRUE)
Load data from excel.
carga.datos.excel( ruta, sheet = 1, header = TRUE, startRow = 0, startCol = 0, endRow = 0, endCol = 0, row_names = TRUE, deleteNA = TRUE, preview = FALSE )
carga.datos.excel( ruta, sheet = 1, header = TRUE, startRow = 0, startCol = 0, endRow = 0, endCol = 0, row_names = TRUE, deleteNA = TRUE, preview = FALSE )
ruta |
the name of the file which the data are to be read from. |
sheet |
The name or index of the worksheet to read from. |
header |
a logical value indicating whether the file contains the names of the variables as its first line. |
startRow |
The index of the first row to read from. Defaults to 0 meaning that the start row is determined automatically. |
startCol |
The index of the first column to read from. Defaults to 0 meaning that the start column is determined automatically. |
endRow |
The index of the last row to read from. Defaults to 0 meaning that the end row is determined automatically. |
endCol |
The index of the last column to read from. Defaults to 0 meaning that the end column is determined automatically. |
row_names |
a logical value indicating whether the file contains the names of the rows as its first column. |
deleteNA |
a logical value indicating if rows with NA should be removed. |
preview |
a logical value indicating if only load the first 10 rows. |
A data.frame object with the information of a file on excel.
Diego Jimenez <[email protected]>
tf <- tempfile() writexl::write_xlsx(iris, paste0(tf, ".xlsx"), TRUE) carga.datos.excel(ruta = paste0(tf, ".xlsx"), row_names = FALSE, preview = TRUE)
tf <- tempfile() writexl::write_xlsx(iris, paste0(tf, ".xlsx"), TRUE) carga.datos.excel(ruta = paste0(tf, ".xlsx"), row_names = FALSE, preview = TRUE)
HTML for show code on shiny application.
codigo.monokai(id, height)
codigo.monokai(id, height)
id |
The input slot that will be used to access the value. |
height |
The height of the input, e.g. '400px', or '100vh'. |
An HTML element.
Diego Jimenez <[email protected]>
codigo.monokai("id", "70vh")
codigo.monokai("id", "70vh")
Create disjunctive columns to a data.frame.
datos.disyuntivos(data, var)
datos.disyuntivos(data, var)
data |
a data.frame object. |
var |
the column name to apply disjunctive code. |
A data.frame object after apply disjunctive code.
Diego Jimenez <[email protected]>
datos.disyuntivos(iris, "Species")
datos.disyuntivos(iris, "Species")
Back disjunctive column to original.
devolver.disyuntivos(data, var)
devolver.disyuntivos(data, var)
data |
a data.frame object. |
var |
the column name that is disyunctive. |
A data.frame object before apply disjunctive code.
Diego Jimenez <[email protected]>
r <- datos.disyuntivos(iris, "Species") devolver.disyuntivos(r, "Species")
r <- datos.disyuntivos(iris, "Species") devolver.disyuntivos(r, "Species")
Data.frame with normal test values.
dfnormal(data)
dfnormal(data)
data |
a data.frame object only with the numeric columns. |
A data.frame.
Diego Jimenez <[email protected]>
dfnormal(iris[, -5])
dfnormal(iris[, -5])
Correlation plot
e_cor(x, colors = c("#FF5733", "#F8F5F5", "#2E86C1"))
e_cor(x, colors = c("#FF5733", "#F8F5F5", "#2E86C1"))
x |
a data.frame with correlation values. |
colors |
a vector of lenght 3 with color values. |
echarts4r plot.
Diego Jimenez <[email protected]>
p <- round(cor(iris[, -5]), 3) e_cor(p)
p <- round(cor(iris[, -5]), 3) e_cor(p)
Histogram + boxplot
e_histboxplot( data, var.name, colorBar = "steelblue", colorPoint = "red", titulos = c("Minimo", "Primer Cuartil", "Mediana", "Tercer Cuartil", "Maximo") )
e_histboxplot( data, var.name, colorBar = "steelblue", colorPoint = "red", titulos = c("Minimo", "Primer Cuartil", "Mediana", "Tercer Cuartil", "Maximo") )
data |
a numeric column of a data.frame. |
var.name |
a character value specifying the name of the variable. |
colorBar |
a color for the bars. |
colorPoint |
a color for the points. |
titulos |
a character vector of length 5 specifying the titles to use on legend. |
echarts4r plot.
Diego Jimenez <[email protected]>
e_histboxplot(iris$Sepal.Width, "Sepal.Width")
e_histboxplot(iris$Sepal.Width, "Sepal.Width")
Normal plot
e_histnormal( data, colorbar = "steelblue", colorline = "gray", nombres = c("Histograma", "Curva Normal") )
e_histnormal( data, colorbar = "steelblue", colorline = "gray", nombres = c("Histograma", "Curva Normal") )
data |
a numeric column of a data.frame. |
colorbar |
a color for the bars. |
colorline |
a color for the line. |
nombres |
a character vector of length 2 specifying the titles to use on legend. |
echarts4r plot.
Diego Jimenez <[email protected]>
e_histnormal(iris$Sepal.Length)
e_histnormal(iris$Sepal.Length)
Qplot + Qline
e_qq(data, colorpoint = "steelblue", colorline = "gray")
e_qq(data, colorpoint = "steelblue", colorline = "gray")
data |
a numeric column of a data.frame. |
colorpoint |
a color for the points. |
colorline |
a color for the line. |
echarts4r plot.
Diego Jimenez <[email protected]>
e_qq(iris$Sepal.Length)
e_qq(iris$Sepal.Length)
Information box.
infoBoxPROMiDAT(titulo, valor, icono)
infoBoxPROMiDAT(titulo, valor, icono)
titulo |
Title text. |
valor |
The value to display in the box. Usually a number or short text. |
icono |
An icon tag, created by icon. |
An HTML element.
Diego Jimenez <[email protected]>
library(shiny) infoBoxPROMiDAT("Title", "Value", icon("info"))
library(shiny) infoBoxPROMiDAT("Title", "Value", icon("info"))
Create a label that can be used to show text.
labelInput(inputId, value = "")
labelInput(inputId, value = "")
inputId |
The input slot that will be used to access the value. |
value |
Initial value. |
An HTML element.
Diego Jimenez <[email protected]>
labelInput("id", "data")
labelInput("id", "data")
Returns a vector of keys to translate with tr.
labels_loadeR()
labels_loadeR()
a vector of keys.
Diego Jimenez <[email protected]>
labels_loadeR()
labels_loadeR()
Provides a framework to load text and excel files through a 'shiny' graphical interface. It allows renaming, transforming, ordering and removing variables. It includes basic exploratory methods such as the mean, median, mode, normality test, histogtram and correlation.
Package: | loadeR |
Type: | Package |
Version: | 1.3.0 |
Date: | 2024-10-24 |
License: | GPL (>=2) |
Maintainer: Oldemar Rodriguez Rojas <[email protected]>
Oldemar Rodriguez Rojas <[email protected]>
Diego Jiménez Alvarado
Joseline Quirós Mendez
Useful links:
Report bugs at https://github.com/PROMiDAT/loadeR/issues
carga_datos Server Functions.
mod_carga_datos_server( id, updateData, modelos, codedioma, paquete = "predictoR" )
mod_carga_datos_server( id, updateData, modelos, codedioma, paquete = "predictoR" )
id |
Internal parameters for shiny. |
updateData |
shiny reactive values. |
modelos |
shiny reactive values. |
codedioma |
shiny reactive values. |
paquete |
indicates if the data is going to be used for exploratory, predictive, or regression analysis. |
shiny server module.
Joseline Quiros <[email protected]>
carga_datos UI Function
mod_carga_datos_ui(id, title, paquete = "predictoR")
mod_carga_datos_ui(id, title, paquete = "predictoR")
id |
Internal parameters for shiny. |
title |
Display title for tab. |
paquete |
indicates if the data is going to be used for exploratory, predictive, or regression analysis. |
shiny ui module.
Joseline Quiros <[email protected]>
correlacion Server Function
mod_correlacion_server(id, updateData, codedioma)
mod_correlacion_server(id, updateData, codedioma)
id |
Internal parameters for shiny. |
updateData |
shiny reactive values. |
codedioma |
shiny reactive values. |
shiny server module.
Diego Jimenez <[email protected]>
correlacion UI Function
mod_correlacion_ui(id)
mod_correlacion_ui(id)
id |
Internal parameters for shiny. |
shiny ui module.
Diego Jimenez <[email protected]>
dispersion Server Function
mod_dispersion_server(id, updateData, codedioma)
mod_dispersion_server(id, updateData, codedioma)
id |
Internal parameters for shiny. |
updateData |
shiny reactive values. |
codedioma |
shiny reactive values. |
shiny server module.
Diego Jimenez <[email protected]>
dispersion UI Function
mod_dispersion_ui(id)
mod_dispersion_ui(id)
id |
Internal parameters for shiny. |
shiny ui module.
Diego Jimenez <[email protected]>
distribuciones Server Function
mod_distribuciones_server(id, updateData, codedioma)
mod_distribuciones_server(id, updateData, codedioma)
id |
Internal parameters for shiny. |
updateData |
shiny reactive values. |
codedioma |
shiny reactive values. |
shiny server module.
Diego Jimenez <[email protected]>
distribuciones UI Function
mod_distribuciones_ui(id)
mod_distribuciones_ui(id)
id |
Internal parameters for shiny. |
shiny ui module.
Diego Jimenez <[email protected]>
normal Server Function
mod_normal_server(id, updateData, codedioma)
mod_normal_server(id, updateData, codedioma)
id |
Internal parameters for shiny. |
updateData |
shiny reactive values. |
codedioma |
shiny reactive values. |
shiny server module.
Diego Jimenez <[email protected]>
normal UI Function
mod_normal_ui(id)
mod_normal_ui(id)
id |
Internal parameters for shiny. |
shiny ui module.
Diego Jimenez <[email protected]>
r_numerico Server Function
mod_r_numerico_server(id, updateData, codedioma)
mod_r_numerico_server(id, updateData, codedioma)
id |
Internal parameters for shiny. |
updateData |
shiny reactive values. |
codedioma |
shiny reactive values. |
shiny server module.
Diego Jimenez <[email protected]>
r_numerico UI Function
mod_r_numerico_ui(id)
mod_r_numerico_ui(id)
id |
Internal parameters for shiny. |
shiny ui module.
Diego Jimenez <[email protected]>
Creates a button to use in a options menu.
options.run(runid, label = "opts")
options.run(runid, label = "opts")
runid |
The input slot that will be used to access the value. |
label |
A label on the top of the menu. |
An HTML element.
Diego Jimenez <[email protected]>
options.run("id")
options.run("id")
Run the Shiny Application
run_app(paquete = "predictoR", ...)
run_app(paquete = "predictoR", ...)
paquete |
indicates if the data is going to be used for exploratory, predictive, or regression analysis. |
... |
A series of options to be used inside the app. |
No return value, run a shiny application.
Tabset panel with options menu.
tabBoxPrmdt(..., id = NULL, title = NULL, opciones = NULL, open = NULL)
tabBoxPrmdt(..., id = NULL, title = NULL, opciones = NULL, open = NULL)
... |
tabPanel() elements to include in the tabset. |
id |
If provided, you can use input$id in your server logic to determine which of the current tabs is active. The value will correspond to the value argument that is passed to tabPanel(). |
title |
Text or input to add on the opposite side of the tabs. |
opciones |
list of html options to add on the footer of the tabset. |
open |
Class to assign first option, for example to start open. |
An HTML element.
Diego Jimenez <[email protected]>
library(shiny) tabBoxPrmdt(id = "id", title = "title", tabPanel("Tab1"))
library(shiny) tabBoxPrmdt(id = "id", title = "title", tabPanel("Tab1"))
Options menu in footer for tabBoxPrmdt (tabsetPanel).
tabsOptions( botones = list(paste(labelInput("opts"), icon("gear"))), widths = 100, heights = 50, tabs.content = list(""), id = NULL )
tabsOptions( botones = list(paste(labelInput("opts"), icon("gear"))), widths = 100, heights = 50, tabs.content = list(""), id = NULL )
botones |
list of icons to each option of the menu. Minimum 1, maximum 5. |
widths |
vector of widths to each option of the menu. Minimum 1, maximum 5. |
heights |
vector of heights to each option of the menu. Minimum 1, maximum 5. |
tabs.content |
list of UI elements to include within each menu option. Minimum 1, maximum 5. |
id |
If provided, you can use input$id in your server logic to get the element. |
An HTML element.
Diego Jimenez <[email protected]>
tabsOptions()
tabsOptions()
Returns a translate text (user defined).
tr(text, idioma = "es")
tr(text, idioma = "es")
text |
text to translate. |
idioma |
language to use. For example: "en". |
a translate text.
Diego Jimenez <[email protected]>
tr("data", "en")
tr("data", "en")
Returns a list of sentences with their translation in different languages.
translation.loadeR()
translation.loadeR()
a list of sentences with their translation in different languages.
Diego Jimenez <[email protected]>
translation.loadeR()
translation.loadeR()
Change the value of a label input on the client.
updateLabelInput(session, labelid, value = NULL)
updateLabelInput(session, labelid, value = NULL)
session |
The session object passed to function given to shinyServer. Default is getDefaultReactiveDomain(). |
labelid |
The id of the input object. |
value |
Initial value. |
An HTML element.
Diego Jimenez <[email protected]>
Filter category variables of a data.frame.
var.categoricas(data)
var.categoricas(data)
data |
a data.frame object. |
A data.frame object only with its categoric variables.
Diego Jimenez <[email protected]>
var.categoricas(iris)
var.categoricas(iris)
Filter numeric variables of a data.frame.
var.numericas(data)
var.numericas(data)
data |
a data.frame object. |
A data.frame object only with its numeric variables.
Diego Jimenez <[email protected]>
var.numericas(iris)
var.numericas(iris)