Objetvo: Publicar un archivo de excel

### Llamamos la libreria
library(readxl)

### Buscamos la Ruta
ruta <- read_excel("C:/Users/chaco/Documents/ITD/Ciencia de los Datos/Datos/lista.xlsx")

### Mostramos el archivo
ruta
## # A tibble: 15 x 5
##    nombres  edades generos sueldos edociviles
##    <chr>     <dbl> <chr>     <dbl> <chr>     
##  1 Juan         40 M         5400  S         
##  2 Mary         26 F         6800. C         
##  3 Ruben        56 M        34200. V         
##  4 Paty         70 F        68400. D         
##  5 Jorge        23 M        23501. V         
##  6 Luis         17 M        32900  S         
##  7 Olga         23 F        26501. C         
##  8 Veronica     45 F        25800. V         
##  9 Mimi         34 F        20500. D         
## 10 Karina       28 F        21800. V         
## 11 Nadia        33 F        13500  C         
## 12 Oscar        50 M        22001. S         
## 13 German       21 M        35400. C         
## 14 Carlos       42 M        90000  C         
## 15 Rodolfo      38 M        18000  S