Publications by 16040461

CONJUNTOS PRACTICA 7

11.04.2020

#Practica 7 #Jesus Alejandro Vergara Hernandez #Numero de control: 16040461 #CONJUNTOS #*De una población de 34 nombres se asginan aleatoriamente participantes que jugarán en alguna disciplina deportiva. #*Puede coincidir que los nombres participen en más de una disciplina. #*Se realizan operaciones de conjuntos union, intersección y...

5 sym R (12099 sym/99 pcs)

Practica2

04.03.2020

#Explorando y describiendo datos de ventas #Cargar librerias #Cargar la librería previamente instalada library (readr) #Cargar los datos #Se cargan los datos asignandolo a una variable llamada ventas #Convertir el tipo de datos ventas a data.frame para su mejor tratamiento #Ver el tipo de datos de ventas con la funcion class() venta...

592 sym R (69833 sym/49 pcs) 2 img

Regresión lineal múltiple para predecir precios de casa Melbourne

04.03.2020

#Cargar librerias library(readr) library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(ggplot2) library(reshape) # Para renombrar columnas ## ## Atta...

593 sym R (28667 sym/63 pcs) 3 img

Aerolinea

21.02.2020

#CARGAR LOS DATOS library(readr) library(ggplot2) library(stats) datos <- read_csv("C:/Users/esemi/OneDrive/Documentos/RSTUDIO/datos/dates.csv") ## Parsed with column specification: ## cols( ## ruta = col_character(), ## millas = col_double(), ## costo = col_double() ## ) summary(datos) ## ruta millas c...

593 sym R (4594 sym/28 pcs) 3 img

PRACTICA4

21.02.2020

#Mostrar datos y generar datos set.seed(1000) muestra <- sample(70:100, size = 1000, replace=TRUE) muestra ## [1] 85 73 80 91 88 93 98 72 98 87 91 75 82 75 70 78 98 95 ## [19] 95 97 92 87 74 99 88 85 95 98 79 78 95 76 93 81 86 91 ## [37] 93 97 96 77 88 72 96 75 76 82 91 75 76 85 97 7...

593 sym R (26048 sym/33 pcs) 3 img

Document

20.02.2020

set.seed(1000) dist1 <- sample(70:100, size = 50, replace=TRUE) dist2 <- sample(70:100, size = 50, replace=TRUE) dist3 <- sample(70:100, size = 50, replace=TRUE) ###Datos de la distribucion 1 dist1 ## [1] 85 73 80 91 88 93 98 72 98 87 91 75 82 75 70 78 98 95 95 97 92 87 74 99 88 ## [26] 85 95 98 79 78 95 76 93 81 86 91 93 97 96 77 88 72 96 ...

2317 sym R (4301 sym/73 pcs) 6 img

ANALISIS DESCRIPTIVO

15.02.2020

library(readr) datos <- read_csv("datosalumnos.csv") ## Parsed with column specification: ## cols( ## NO = col_double(), ## NOMBRE = col_character(), ## GENERO = col_character(), ## EDAD = col_double(), ## ESTATURA = col_double(), ## PESO = col_double() ## ) #Transformar a data.frame #Asegurarse de que los datos son del tipo...

7 sym R (5723 sym/20 pcs) 2 img

Frecuencias

15.02.2020

# Preferencias de actividad deportiva y cultural en una muestra de 30 alumnos actividad <- c('Dibujo', 'Tiro con Arco', 'Baile', 'Voleybol', 'Futbol', 'Americano', 'Natación', 'Tahitiano', 'Natación', 'Tiro con Arco', 'Futbol', 'Americano', 'Basquetbol', 'Banda de Guerra', 'Voleybol', 'Futbol', ...

7 sym R (6707 sym/23 pcs) 2 img

Document

14.02.2020

R Markdown This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com. When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within t...

591 sym R (268 sym/2 pcs) 1 img

Practica1

04.03.2020

#Objetivo #* Determinar pendiente #Descripcion #* Cargar datos promedios <- read.csv("https://raw.githubusercontent.com/rpizarrog/probabilidad-y-estad-stica/master/practicas%20R/datos/alumnos.csv") head(promedios) ## No..Control Semestre Cr..Apr. Carga Promedio ## 1 10040001 8 154 23 83.24 ## 2 10040002 ...

591 sym R (5072 sym/23 pcs) 1 img