Publications by Gabriel Medina
WorkShop1 kShop2
Tema 4. T de Student pagos=c(107,92,97,95,105,101,91,99,95,104) t.test(pagos,y=NULL,alternative="two.sided",mu=100,paired=FALSE,var.equal=FALSE,conf.level=0.90) ## ## One Sample t-test ## ## data: pagos ## t = -0.79888, df = 9, p-value = 0.4449 ## alternative hypothesis: true mean is not equal to 100 ## 90 percent confidence interval: ## 95....
10077 sym 14 img 3 tbl
WORKSHOP2
Tema 4. T de Student pagos=c(107,92,97,95,105,101,91,99,95,104) t.test(pagos,y=NULL,alternative="two.sided",mu=100,paired=FALSE,var.equal=FALSE,conf.level=0.90) ## ## One Sample t-test ## ## data: pagos ## t = -0.79888, df = 9, p-value = 0.4449 ## alternative hypothesis: true mean is not equal to 100 ## 90 percent confidence interval: ## 95....
10077 sym 14 img 3 tbl
WorkShop2
Tema 4. T de Student pagos=c(107,92,97,95,105,101,91,99,95,104) t.test(pagos,y=NULL,alternative="two.sided",mu=100,paired=FALSE,var.equal=FALSE,conf.level=0.90) ## ## One Sample t-test ## ## data: pagos ## t = -0.79888, df = 9, p-value = 0.4449 ## alternative hypothesis: true mean is not equal to 100 ## 90 percent confidence interval: ## 95....
6686 sym 1 img 2 tbl
WorkShop1
Sesión 1. Medidas de tendencia central data=c(266.63,163.41,219.41,162.64,187.16,289.17,306.55,335.48,343.50,226.80,208.99,230.46) #Media media=mean(data) media ## [1] 245.0167 #Mediana mediana= median (data) mediana ## [1] 228.63 #Moda #En R no hay una funcion directa para la moda #Rango rango = max(data)-min(data) rango ## [1] 180.86 #Varianz...
14619 sym 9 img 1 tbl
Comandos básicos
Comandos 1 + 5 ## [1] 6 78878.12 * 8e05 / (12 - 7 + 87.2) ## [1] 684408850 #Manipulacion de datos #Funcion concatenar c() #Un vector del 1 al 5 a<- c(1,2,3,4,5) a ## [1] 1 2 3 4 5 # del 1 al 10 b<- c(1:10) b ## [1] 1 2 3 4 5 6 7 8 9 10 c<- c(10:1) c ## [1] 10 9 8 7 6 5 4 3 2 1 d<-c(1.5:7.5) d ## [1] 1.5 2.5 3.5 4.5 5.5 6.5 7.5...
47 sym
Manipulación de datos
#Cocatenar ?c #Un vector a=c(1,2,3,4,5) a ## [1] 1 2 3 4 5 b= c(1:10) b ## [1] 1 2 3 4 5 6 7 8 9 10 c = c(10:1) c ## [1] 10 9 8 7 6 5 4 3 2 1 d=c(1.5:7.5) d ## [1] 1.5 2.5 3.5 4.5 5.5 6.5 7.5 e=c(1:5,2,4,-3) e ## [1] 1 2 3 4 5 2 4 -3 #Función secuencia seq() f=seq(1:10) f ## [1] 1 2 3 4 5 6 7 8 9 10 g=seq(1...
42 sym
Supermercado
options(repos = list(CRAN="http://cran.rstudio.com/")) install.packages("dplyr") ## ## The downloaded binary packages are in ## /var/folders/0w/zhr00cs94db7pjb4_zldn_zw0000gn/T//Rtmpzys7wz/downloaded_packages install.packages('riem') ## ## The downloaded binary packages are in ## /var/folders/0w/zhr00cs94db7pjb4_zldn_zw0000gn/T//Rtmpzys7wz/down...
33 sym R (5444 sym/21 pcs) 2 img
Renta de bicis
#file.choose() bd <- read.csv("/Users/gabrielmedina/Desktop/rentadebicis.csv") summary(bd) ## hora dia mes año ## Min. : 0.00 Min. : 1.000 Min. : 1.000 Min. :2011 ## 1st Qu.: 6.00 1st Qu.: 5.000 1st Qu.: 4.000 1st Qu.:2011 ## Median :12.00 Median :10.000 Median : 7.000...
20 sym 1 img
Seguros
#bd=read.csv("/Users/gabrielmedina/Downloads/Documento s/seguros.csv") #Entender la base de datos #summary(bd) #install.packages("dplyr") #library(dplyr) #dplyr es una librería para manipular datos #count(bd,ClaimStatus, sort=TRUE) #count(bd,IncidentDate, sort=TRUE) #count(bd,IncidentDescription, sort=TRUE) #count(bd,ReturnToWorkDate, sort=TRUE...
11 sym R (1087 sym/1 pcs)
Market Base Analysis
Market basket analisys #Instalar paquetes y llamar librerías install.packages(“plyr”) library(plyr) install.packages(“Matrix”) library(Matrix) install.packages(“arules”) library(arules) install.packages(“arulesViz”) library(arulesViz) install.packages(“datasets”) library(datasets) file.choose() bd_limpia = read.csv(“/Users/ga...
1533 sym