##1- Use rep() y seq() para generar un vector con los siguientes elementos: 0 0 0 0 0 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 4 4 4 4 4
x1<-rep((0:4), each=5)
x1## [1] 0 0 0 0 0 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 4 4 4 4 4##2-Use rep() y seq() para crear un vector con los siguientes elementos: 5 4 3 2 1 5 4 3 2 1 5 4 3 2 1 5 4 3 2 1
x<-rep((5:1),4)
x## [1] 5 4 3 2 1 5 4 3 2 1 5 4 3 2 1 5 4 3 2 1##3-Introduzca en R una matriz A usando: - Los datos del ejercicio 2 - Arreglo de 4 filas X 3 columnas. Llenando los datos por columna.
matriz<- matrix(x,nrow=4,ncol=3,byrow=FALSE)## Warning in matrix(x, nrow = 4, ncol = 3, byrow = FALSE): data length [20]
## is not a sub-multiple or multiple of the number of columns [3]matriz## [,1] [,2] [,3]
## [1,] 5 1 2
## [2,] 4 5 1
## [3,] 3 4 5
## [4,] 2 3 4##4- Acceda a los algunos elementos de la matriz de la siguiente manera: A[1,1:3], A[1:4,2], A[3,3], A[11], A[20], A[5,4], A[-3,] y explique que pasa en cada caso.
matriz[1,1:3] #Devuelve la posicion de la fila 1, de la columna de la 1 a la 3.## [1] 5 1 2matriz[1:4,2] #Devuelve la posicion de la fila 1, los 4 datos de la columna 2.## [1] 1 5 4 3matriz[3,3] #Devuelve la posicion de la fila 3, columna 3.## [1] 5matriz[11] #Devuelve la posicion de la fila 3, columna 3 contandolo de forma vertical.## [1] 5matriz[20] #No devuelve nada ya que no hay tantas posicion dentro de la matriz.## [1] NAmatriz[5,4] #Este devuelve un error ya que lo que se pide esta fuera de las fronteras de la matriz## Error in matriz[5, 4]: subscript out of boundsmatriz[-3,] #Nos dice que la fila 3 desaparece.## [,1] [,2] [,3]
## [1,] 5 1 2
## [2,] 4 5 1
## [3,] 2 3 4##5- Recopile la información de su grupo referente a - Edad - Empresa - Nombre - Profesión(no utilice tildes)
##Edad=35
##Empresa= Neustar
##Nombre=Anthony
##Profesion= Network_Geography_Analyst
##Edad=29
##Empresa= Neustar
##Nombre=Luis
##Profesion= Network_Geography_Analyst
##Edad=32
##Empresa= Neustar
##Nombre=Pablo
##Profesion= Network_Geography_Analyst
##Edad=35
##Empresa= Neustar
##Nombre=Jose
##Profesion= Network_Geography_Analyst
##Edad=30
##Empresa= Neustar
##Nombre=Ronny
##Profesion= Prod_Support
Nombre <- factor(c("Anthony","Luis","Pablo","Jose","Ronny"), levels = c("Anthony","Luis","Pablo","Jose","Ronny"))
Nombre## [1] Anthony Luis Pablo Jose Ronny
## Levels: Anthony Luis Pablo Jose RonnyEdad <- c(35, 29, 32, 35,30)
Edad## [1] 35 29 32 35 30empresa <- c(rep("Neustar",5))
empresa## [1] "Neustar" "Neustar" "Neustar" "Neustar" "Neustar"Profesion <- c("Network_Geography_Analyst","Network_Geography_Analyst","Network_Geography_Analyst","Network_Geography_Analyst","Prod_Support")
Profesion## [1] "Network_Geography_Analyst" "Network_Geography_Analyst"
## [3] "Network_Geography_Analyst" "Network_Geography_Analyst"
## [5] "Prod_Support"##6-Introduzca según el tipo de datos adecuado a base de código R en un DataFrame la información recopilada en el punto anterior
datosgrupo <- data.frame(Nombre = Nombre, Edad = Edad, empresa = empresa, Profesion = Profesion )
datosgrupo## Nombre Edad empresa Profesion
## 1 Anthony 35 Neustar Network_Geography_Analyst
## 2 Luis 29 Neustar Network_Geography_Analyst
## 3 Pablo 32 Neustar Network_Geography_Analyst
## 4 Jose 35 Neustar Network_Geography_Analyst
## 5 Ronny 30 Neustar Prod_Support##7- Visualice los datos registrados.
datosgrupo## Nombre Edad empresa Profesion
## 1 Anthony 35 Neustar Network_Geography_Analyst
## 2 Luis 29 Neustar Network_Geography_Analyst
## 3 Pablo 32 Neustar Network_Geography_Analyst
## 4 Jose 35 Neustar Network_Geography_Analyst
## 5 Ronny 30 Neustar Prod_Support##8- Visualice la estructura de los datos recopilados
str(datosgrupo)## 'data.frame': 5 obs. of 4 variables:
## $ Nombre : Factor w/ 5 levels "Anthony","Luis",..: 1 2 3 4 5
## $ Edad : num 35 29 32 35 30
## $ empresa : Factor w/ 1 level "Neustar": 1 1 1 1 1
## $ Profesion: Factor w/ 2 levels "Network_Geography_Analyst",..: 1 1 1 1 2##9- Compile en una sola lista los objetos creados para resolver los ejercicios anteriores.
lista<-list(vector=x1,vector=x,matriz=matriz,dataframe=datosgrupo)
lista## $vector
## [1] 0 0 0 0 0 1 1 1 1 1 2 2 2 2 2 3 3 3 3 3 4 4 4 4 4
##
## $vector
## [1] 5 4 3 2 1 5 4 3 2 1 5 4 3 2 1 5 4 3 2 1
##
## $matriz
## [,1] [,2] [,3]
## [1,] 5 1 2
## [2,] 4 5 1
## [3,] 3 4 5
## [4,] 2 3 4
##
## $dataframe
## Nombre Edad empresa Profesion
## 1 Anthony 35 Neustar Network_Geography_Analyst
## 2 Luis 29 Neustar Network_Geography_Analyst
## 3 Pablo 32 Neustar Network_Geography_Analyst
## 4 Jose 35 Neustar Network_Geography_Analyst
## 5 Ronny 30 Neustar Prod_Support##10-Instale y cargue el paquete swirl.Indique su utilidad y además brinde una pequeña guía de uso del paquete.
Este paquete es un tutorial que nos ayuda o nos direcciona con instrucciones o practicas el mejor aprendizaje de R incluyendo funciones y comandos.
install.packages("swirl")## Installing package into '/home/rstudio-user/R/x86_64-pc-linux-gnu-library/3.5'
## (as 'lib' is unspecified)library(swirl)##
## | Hi! I see that you have some variables saved in your workspace. To keep
## | things running smoothly, I recommend you clean up before starting swirl.
##
## | Type ls() to see a list of the variables in your workspace. Then, type
## | rm(list=ls()) to clear your workspace.
##
## | Type swirl() when you are ready to begin.##Bonus ##-Investigue como crear nombres a las filas y columnas de una matriz.Para la matriz creada en este reporte asigne los nombres de filas y columnas(escoja los nombres que usted desee) y visualice los resultados en el reporte.
rownames(matriz) <- c("fila1", "fila2", "fila3","fila4")
colnames(matriz) <- c("col_A", "col_B", "col_C")
matriz## col_A col_B col_C
## fila1 5 1 2
## fila2 4 5 1
## fila3 3 4 5
## fila4 2 3 4##-Publique su reporte en Rpubs y haga llegar al profesor el link del reporte.