por Diego Calvo | Feb 13, 2018 | Inteligencia de negocio, R
Generación de datos # Generación de la curva de demanda (linealmente dependiente del precio) demanda = function(p, alpha = -40, beta = 500, sd = 10) { error = rnorm(length(p), sd = sd) q = p*alpha + beta + error } Generación de los datos a analizar... por Diego Calvo | Feb 8, 2018 | R
Solución para ocultar elementos Después de probar diferentes soluciones, he conseguido que una me funcione, es tan simple como se muestra a continuación: library(shiny) library(shinyjs) ui <- fluidPage( useShinyjs(), actionButton(«button», «Click me»), div(id =... por Diego Calvo | Feb 8, 2018 | R
Solución para visualizar caracteres especiales ( ñ, á, é, í, ó, ú ) para Mac Después de probar infinidad de soluciones propuestas, he conseguido que una me funcione, es tan simple como añadir al principio del fichero ui de shiny la siguiente linea de código.... por Diego Calvo | Nov 28, 2017 | Inteligencia de negocio, R
Instalación de paquetes # install.packages(«keras») # devtools::install_github(«rstudio/keras») library(keras) install_keras() use_session_with_seed(1,disable_parallel_cpu = FALSE) Generación del conjunto de entrenamiento # Cargar de conjunto de entrenamiento de... por Diego Calvo | Nov 17, 2017 | R
A continuación se muestran varios ejemplos de como se pueden analizar datos de Google Trends, aunque antes de ello no está de más indicar las librerias que deben de tenerse instaladas install.packages(«gtrendsR») install.packages(«reshape2») install.packages(«maps»)... por Diego Calvo | Nov 14, 2017 | R
Crear un mapa de agrupamiento de puntos con zoom (leaflet) library(leaflet) longitud <-c(rnorm(200)/1.6 – 3.133 ) latitud <- c(rnorm(200)/2.6 + 39.3 ) df <- data.frame(longitud,latitud) leaflet(df) %>% addTiles() %>% addMarkers(lng = ~longitud,...
