Objetivo Crear un archivo en excel con 15 registros con los datos de la practica NO. 2 entregada.

library(readxl)

ruta <- ("C:/Users/Figueroa/Documents/Ciencia de los datos/datos/Practica 3.xlsx")

datospractica3 <- read_xlsx(ruta) #Leemos el archivo de excel

# Mostramos el archivo de excel

datospractica3 #se ve en terminal
## # A tibble: 15 x 4
##    NOMBRE     EDAD SUELDO `ESTADO CIVIL`
##    <chr>     <dbl>  <dbl> <chr>         
##  1 JUAN         40  5401. M             
##  2 MARY         26  6800. F             
##  3 RUBEN        56 34200. M             
##  4 PATY         70 68400. F             
##  5 JORGE         3 23501. M             
##  6 LUIS         17 32900  M             
##  7 OLGA         23 23551. F             
##  8 VERONICA     45 25800. F             
##  9 MIMI         34 20500. F             
## 10 KARINA       28 21800. F             
## 11 ALEJANDRO    40 32000. M             
## 12 MAITE        33 40231  F             
## 13 ARLETH       20 32587. F             
## 14 ANTONIO      36 23522  M             
## 15 SARAH        42 56352. F