Publications by Hector Javier Villarreal
Comandos Básicos
Símbolos #^ #~ Asignación de Variables x <- 3 y <- 2 Impresión de Resultados #x #y Operaciones Aritméticas suma <- x+y suma ## [1] 5 resta <- x-y resta ## [1] 1 multiplicacion <- x*y multiplicacion ## [1] 6 division <- x/y division ## [1] 1.5 division_entera <- x%/%y division_entera ## [1] 1 residuo <- x%%y residuo ## [1] 1 potencia <- x...
3661 sym 3 img
Jingle Bells
Codigo de Melodia #install.packages("devtools") devtools::install_github("keithmcnulty/Rmusic", build_vignettes = TRUE) ## Skipping install of 'Rmusic' from a github remote, the SHA1 (07d3c027) has not changed since last install. ## Use `force = TRUE` to force installation jbells_pitch <- paste( "E E E", "E E E", "E G C D", "E", "F F ...
3418 sym Python (2464 sym/6 pcs) 1 img
Cancer de Mama
Importar Base de Datos #file.choose() base_de_datos <- read.csv("/Users/hj/Desktop/Concentracion Analitica de Datos 2022/Modulo 3/cancer_de_mama.csv") summary(base_de_datos) ## diagnosis radius_mean texture_mean perimeter_mean ## Length:569 Min. : 6.981 Min. : 9.71 Min. : 43.79 ## Class :character 1st...
2058 sym R (6248 sym/10 pcs) 4 img
Walmart
Importar bases de datos #file.choose() stores <- read.csv("/Users/hj/Desktop/R STUDIO ACT's/CSV/stores.csv") features <- read.csv("/Users/hj/Desktop/R STUDIO ACT's/CSV/Features.csv") train <- read.csv("/Users/hj/Desktop/R STUDIO ACT's/CSV/train.csv") test <- read.csv("/Users/hj/Desktop/R STUDIO ACT's/CSV/test.csv") Instalar paquetes y llamar li...
8255 sym R (18692 sym/48 pcs) 1 img
Titanic
#file.choose() base_de_datos <- read.csv ("/Users/hj/Desktop/R STUDIO ACT's/CSV/titanic.csv") Entender la base de datos summary(base_de_datos) ## pclass survived name sex ## Min. :1.000 Min. :0.000 Length:1310 Length:1310 ## 1st Qu.:2.000 1st Qu.:0.000 Class :character C...
2499 sym R (4568 sym/13 pcs) 3 img
ASOS
ASOS - Clima Información del Automated Surface Observing System (ASOS) Instalar paquete y llamar librerias #install.packages("riem") #library(riem) #install.packages("tidyverse") #library(tidyverse) #install.packages("lubridate") #library(lubridate) #install.packages("ggplot2") #library(ggplot2) #install.packages("plotly") #library(plotly) #li...
4551 sym R (1922 sym/12 pcs) 1 img
Renta de Bicis
#file.choose() bd <- read.csv("/Users/hj/Desktop/R STUDIO ACT's/CSV/rentadebicis.csv") Entender la Base de Datos # Herramienta "El Generador d Valor de Datos" # Paso 1. Definir el área del negocio que buscamos impactar o mejorar y su KPI # El departamento de marketing, queremos aumentar las rentas, usando como LPI las rentas mensuales # Paso 2...
5535 sym 2 img
Seguros
Importar base de datos #file.choose() bd <- read.csv ("/Users/hj/Desktop/R STUDIO ACT's/CSV/seguros.csv") Entender la base de datos # Herramienta "El Generador d Valor de Datos" # Paso 1. Definir el área del negocio que buscamos impactar o mejorar y su KPI # Veremos la parte de finaciera de la empresa, el KPI sera Siniestros por tipo de poliza...
3696 sym R (8815392 sym/19 pcs) 1 img
Abarrotes
# *Importar base de datos* ```r abarrotes <- read.csv ("/Users/hj/Desktop/R STUDIO ACT's/CSV/abarrotes_ventas-2 .csv") summary(abarrotes) ## vcClaveTienda DescGiro Codigo.Barras PLU ## Length:200625 Length:200625 Min. :8.347e+05 Min. : 1.00 ## Class :character Class :character 1st Qu.:7...
10016 sym R (397257 sym/88 pcs) 3 img
Banco Mundial
Instalar Paquetes #install.packages("WDI") #install.packages("wbstats") #install.packages("tidyverse") Informacion de un Pais library(wbstats) gdp_data <- wb_data(country = "MX", indicator = "NY.GDP.PCAP.CD", start_date = 1973, end_date = 2022) summary(gdp_data) ## iso2c iso3c country date ## Len...
1481 sym R (3449 sym/9 pcs) 1 img