1. Crea el un vector numérico con el nombre numerico que tenga las siguientes características1.
numerico<- seq(5,65, by = 5)
numerico
##  [1]  5 10 15 20 25 30 35 40 45 50 55 60 65
class(numerico)
## [1] "numeric"
  1. Crea un vector de llamado alfabeto con los siguientes elementos.
alfabeto<- rep(1:7,7)
alfabeto
##  [1] 1 2 3 4 5 6 7 1 2 3 4 5 6 7 1 2 3 4 5 6 7 1 2 3 4 5 6 7 1 2 3 4 5 6 7
## [36] 1 2 3 4 5 6 7 1 2 3 4 5 6 7
class(alfabeto)
## [1] "integer"
  1. Convierte el vector alfabeto a un factor con los niveles A, B, C, D, E, F y G. Como el que se muestra a continuación.2
alfabeto<- factor(alfabeto,labels = LETTERS[1:7])
alfabeto
##  [1] A B C D E F G A B C D E F G A B C D E F G A B C D E F G A B C D E F G
## [36] A B C D E F G A B C D E F G
## Levels: A B C D E F G
  1. Crear una matriz cuadrada con el factor alfabeto.3
mi_matriz<- matrix(alfabeto,nrow = 7, byrow = T)
mi_matriz
##      [,1] [,2] [,3] [,4] [,5] [,6] [,7]
## [1,] "A"  "B"  "C"  "D"  "E"  "F"  "G" 
## [2,] "A"  "B"  "C"  "D"  "E"  "F"  "G" 
## [3,] "A"  "B"  "C"  "D"  "E"  "F"  "G" 
## [4,] "A"  "B"  "C"  "D"  "E"  "F"  "G" 
## [5,] "A"  "B"  "C"  "D"  "E"  "F"  "G" 
## [6,] "A"  "B"  "C"  "D"  "E"  "F"  "G" 
## [7,] "A"  "B"  "C"  "D"  "E"  "F"  "G"
  1. Crea la base de datos base. (debe verse igual a la que se muestra)
base<- data.frame(Nombre = c("Velia", "César", "Óscar", "Karla","Ale"), 
                  Sexo = c("F", "M", "M","F","F"), Trabajo = c("Ceneval",NA,NA,"SEP","Ceneval"), orden.alfa = c(5,2,4,3,1))
row.names(base)<- paste("Registro",1:5,sep = ".")
base
##            Nombre Sexo Trabajo orden.alfa
## Registro.1  Velia    F Ceneval          5
## Registro.2  César    M    <NA>          2
## Registro.3  Óscar    M    <NA>          4
## Registro.4  Karla    F     SEP          3
## Registro.5    Ale    F Ceneval          1
  1. Obtén un resumen de la base.
summary(base)
##    Nombre  Sexo     Trabajo    orden.alfa
##  Ale  :1   F:3   Ceneval:2   Min.   :1   
##  César:1   M:2   SEP    :1   1st Qu.:2   
##  Karla:1         NA's   :2   Median :3   
##  Óscar:1                     Mean   :3   
##  Velia:1                     3rd Qu.:4   
##                              Max.   :5
  1. Extrae el siguiente valor de la base.
base[3,1]
## [1] Óscar
## Levels: Ale César Karla Óscar Velia
  1. Filtra la base para que solo te presente las observaciones donde Trabajo tiene como valor Ceneval. 4
base[grep("Ceneval",base$Trabajo),]
##            Nombre Sexo Trabajo orden.alfa
## Registro.1  Velia    F Ceneval          5
## Registro.5    Ale    F Ceneval          1
  1. Crea una lista de nombre mi_lista con los objetos que generaste y tienes en tu sesión de trabajo. (son cuatro).
mi_lista<- list(Uno = numerico, Dos = alfabeto, Tres = mi_matriz, Cuatro = base)
  1. ¿Cómo obtienes el siguiente resultado?
str(mi_lista)
## List of 4
##  $ Uno   : num [1:13] 5 10 15 20 25 30 35 40 45 50 ...
##  $ Dos   : Factor w/ 7 levels "A","B","C","D",..: 1 2 3 4 5 6 7 1 2 3 ...
##  $ Tres  : chr [1:7, 1:7] "A" "A" "A" "A" ...
##  $ Cuatro:'data.frame':  5 obs. of  4 variables:
##   ..$ Nombre    : Factor w/ 5 levels "Ale","César",..: 5 2 4 3 1
##   ..$ Sexo      : Factor w/ 2 levels "F","M": 1 2 2 1 1
##   ..$ Trabajo   : Factor w/ 2 levels "Ceneval","SEP": 1 NA NA 2 1
##   ..$ orden.alfa: num [1:5] 5 2 4 3 1
  1. Descarga la base de datos del siguiente enlace y obtén un resumen de su estructura.5

https://docs.google.com/spreadsheets/d/1yNFjT2d2qONDbLqxcQzi-7qEP6bWoerv-mw4VpEVLi0/edit?usp=sharing

url<- "https://docs.google.com/spreadsheets/d/1yNFjT2d2qONDbLqxcQzi-7qEP6bWoerv-mw4VpEVLi0/edit?usp=sharing"

drive_download(as_id(url),type = "csv")
base.ejemplo<- read.csv("Habilidades_versión_referencia_Ejemplo.csv")
  
str(base.ejemplo)
## 'data.frame':    2096 obs. of  16 variables:
##  $ Folio      : int  508594953 508594354 508593651 508593452 508593153 508591956 508591653 508591551 508591258 508591052 ...
##  $ Reactivos.A: int  23 23 23 23 23 23 23 23 23 23 ...
##  $ Theta.A    : Factor w/ 2088 levels "-1.242.313.022.013",..: 1209 1868 781 191 1490 440 944 1825 444 1532 ...
##  $ SEM.A      : Factor w/ 2088 levels "5.047.235.505.403",..: 103 1013 1226 269 292 668 1462 945 716 371 ...
##  $ Reactivos.B: int  28 28 28 28 28 28 28 28 28 28 ...
##  $ Theta.B    : Factor w/ 2091 levels "-1.362.888.314.258",..: 955 1059 1511 172 2087 1834 1898 732 208 518 ...
##  $ SEM.B      : Factor w/ 2091 levels "4.132.674.144.045",..: 1456 1570 34 1946 942 289 445 1182 1997 938 ...
##  $ Reactivos.C: int  35 35 35 35 35 35 35 35 35 35 ...
##  $ Theta.C    : Factor w/ 2092 levels "-1.100.091.958.464",..: 1609 533 1586 89 1647 503 1427 2023 966 2012 ...
##  $ SEM.C      : Factor w/ 2092 levels "3.260.055.141.464",..: 1183 300 1160 995 1225 346 2011 1626 600 1669 ...
##  $ Reactivos.D: int  33 33 33 33 33 33 33 33 33 33 ...
##  $ Theta.D    : Factor w/ 2088 levels "-1.271.036.622.369",..: 1472 1059 1267 19 1656 464 2044 2001 330 1974 ...
##  $ SEM.D      : Factor w/ 2088 levels "4.666.989.295.543",..: 1214 1847 1047 566 1389 522 1704 1743 1535 1721 ...
##  $ Reactivos.E: int  39 39 39 39 39 39 39 39 39 39 ...
##  $ Theta.E    : Factor w/ 2093 levels "-1.059.297.393.219",..: 1719 1205 278 916 2087 1814 1622 1706 1061 1658 ...
##  $ SEM.E      : Factor w/ 2093 levels "3.694.389.844.039",..: 611 1538 170 1269 1322 808 456 597 1498 529 ...

  1. Existen diferentes formas de llegar al resultado, podrías revisar la ayuda para la función seq(), por ejemplo.↩

  2. Sería útil revisar que argumentos tiene factor().↩

  3. Una matriz cuadrada llamada mi_matriz, mismo número de filas que de columnas. La matriz debe llenarse por filas para que se vea como se muestra a continuación.↩

  4. Existen varias formas de llegar a este resultado, podrías revisar la función grep().↩

  5. Quizá necesites un paquete adicional para bajar la base desde R.↩