class: center, middle .linea-superior[] .linea-inferior[] <img src="imagenes/logo_super_portada.png" width="180" /> # Tarea 1 Soluciones ## Plazo: 23 de mayo --- background-image: url("imagenes/background.PNG") background-size: contain; background-position: 50% 0% # Ejercicio 1: Vectores 1.- Genere un vector con los siguientes `\(4\)` elementos (llame a este objeto como usted desee): `\(20340\)`, `\(1000\)`, `\(2\)`, `\(300\)`. Imprima el objeto. ``` r ropa_dolares <- c(20340,1000,2,300) ropa_dolares ``` ``` ## [1] 20340 1000 2 300 ``` -- 2.- Asuma que el vector creado en el punto 1 consiste en valores de ropa en **dólares**. Genere otro vector (llámelo como usted quiera) que refleje los mismos valores pero ahora en pesos chilenos. Utilice el siguiente tipo de cambio: `\(1 \ dólar = 939.42 \ pesos \ chilenos\)`. Imprima el objeto. ``` r ropa_pesos <- ropa_dolares*939.42 ropa_pesos ``` ``` ## [1] 19107802.80 939420.00 1878.84 281826.00 ``` --- background-image: url("imagenes/background.PNG") background-size: contain; background-position: 50% 0% 3.- Asuma que olvidó agregar un quinto valor y sexto valor al vector creado en el punto 2. Genere un nuevo vector (llámelo como usted quiera) basado en el vector del punto 2 donde se agreguen los valores `\(5000\)` y `\(700\)`. Imprima este objeto. ``` r ropa_pesos_nuevo <- c(ropa_pesos,5000,700) ropa_pesos_nuevo ``` ``` ## [1] 19107802.80 939420.00 1878.84 281826.00 5000.00 700.00 ``` -- 4.- Imprima el largo del vector generado en el punto 3. ``` r length(ropa_pesos_nuevo) ``` ``` ## [1] 6 ``` -- 5.- Lea la documentación sobre la función `round()` y utilícela para crear un nuevo vector (llámelo como usted quiera) basado en el creado en el punto 3 pero que todos sus valores estén redondeados a solamente `\(1\)` decimal. Imprima este nuevo objeto. ``` r ropa_pesos_nuevo_redondeo <- round(ropa_pesos_nuevo,1) ropa_pesos_nuevo_redondeo ``` ``` ## [1] 19107802.8 939420.0 1878.8 281826.0 5000.0 700.0 ``` --- background-image: url("imagenes/background.PNG") background-size: contain; background-position: 50% 0% # Ejercicio 2: Vectores e indexación Cree los siguientes vectores de la siguiente manera: ``` r artistas_chilenos <- c("Los Jaivas", "Los Tres", "Los Prisioneros", "La Ley", "Los Prisioneros", "La Ley", "Los Bunkers") artistas_argentinos <- c("Soda Stereo", "Charly García", "Fito Páez", "Sandro") ``` 1.- Vea la documentación de la función `unique()`. ¿Para qué sirve esta función? Escriba su respuesta en forma de comentario en su script. -- 2.- Como puede ver, en el vector de artistas chilenos existen artistas repetidos. Sobreescriba este vector eliminando los artistas repetidos. Utilice indexación y el operador `-`. Imprima el vector de artistas chilenos. ``` r artistas_chilenos <- artistas_chilenos[-c(5,6)] artistas_chilenos ``` ``` ## [1] "Los Jaivas" "Los Tres" "Los Prisioneros" "La Ley" ## [5] "Los Bunkers" ``` --- background-image: url("imagenes/background.PNG") background-size: contain; background-position: 50% 0% 3.- Ahora que no debiese tener artistas repetidos en ninguno de los dos vectores, una los vectores en uno solo y llámelo `artistas_chilenos_argentinos`. Imprima el objeto. ``` r artistas_chilenos_argentinos <- c(artistas_chilenos,artistas_argentinos) artistas_chilenos_argentinos ``` ``` ## [1] "Los Jaivas" "Los Tres" "Los Prisioneros" "La Ley" ## [5] "Los Bunkers" "Soda Stereo" "Charly García" "Fito Páez" ## [9] "Sandro" ``` --- background-image: url("imagenes/background.PNG") background-size: contain; background-position: 50% 0% # Ejercicio 2: Vectores e indexación Considere el siguiente vector que contiene artistas favoritos de cualquier nacionalidad: ``` r artistas_favoritos <- c("Charly García", "Pink Floyd", "Los Jaivas", "The Beatles","Soda Stereo", "Hozier") ``` 4.- Genere un nuevo objeto llamado `artistas_favoritos_chilenos_argentinos` que sólo contenga los artistas favoritos que sean chilenos o argentinos. **Hint:** Use indexación y un operador de vectores visto en la sesión 2. Imprima este objeto. ``` r artistas_favoritos_chilenos_argentinos <- artistas_favoritos[artistas_favoritos %in% artistas_chilenos_argentinos] artistas_favoritos_chilenos_argentinos ``` ``` ## [1] "Charly García" "Los Jaivas" "Soda Stereo" ``` --- background-image: url("imagenes/background.PNG") background-size: contain; background-position: 50% 0% # Ejercicio 3: Verdadero o Falso Responda Verdadero o Falso como comentario en su script. 1.- Las licencias para usar el lenguaje R se compran a la empresa neozelandesa que construyó este lenguaje. -- **Respuesta:** Falso. -- 2.- Si se desea comprobar que un número, caracter, o vector **es distinto** a otro dato se puede utilizar el operador lógico `!==`. -- **Respuesta:** Falso. -- 3.- Una variable lógica `TRUE` asociada mediante el operador **O** (también llamado *disyunción*) a otra variable lógica `FALSE` resulta en un valor `TRUE`. -- **Respuesta:** Verdadero. -- 4.- Si se corre la función `class()` con el argumento `"3"`, es decir, `class("3")`, la consola arrojará `numeric`. -- **Respuesta:** Falso.