MiPrimeraPáginaWeb

Author

Jason Barrios

BIENVENIDOS A MI PRIMERA PÁGINA WEB

Hola Soy Jason

Me presento brevemente mi nombre completo: Jason Esteban Barrios Mosquera, 28 años, esposo de Maria Jose Atencio, una hermosa contadora Pública. Sin hijos aún.

Soy hijo mayor de un núcleo familiar primario compuesto de 7 individuos a los cuales amo mucho.

Por gracia y misericordia de Dios, Ingeniero industrial, de la Universidad del Norte. Especialista en Gestión de riesgos organizacional y eficiencia industrial (no titulado, solamente por experiencia y cargos dentro de la compañía). En esta área desempeño labores en una reconocida empresa dedicada a la producción, transformación y comercialización de aceros.

Ya después de 8 años de mi última educación formal, con mucha emoción tomo la maestría en analítica de datos, con la expectativa de potencializar mi perfil profesional, afianzar y profundizar los conocimientos genéricos que puedo tener en el análisis de datos, e incorporar poco a poco la rama educacional dentro de mi recorrido profesional.

Dejo por acá mis datos, a través de los cuales le abro el espacio para contacto:

mail: jasonb@uninorte.edu.co
Cel. 3004420156
LinkedIn:@jasonbarriosmosquera

Algo interesante en Quarto

Cómo importar información de una web?

 # para manipular datos
library(tidyverse)
── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.1.4     ✔ readr     2.1.5
✔ forcats   1.0.0     ✔ stringr   1.5.1
✔ ggplot2   3.5.1     ✔ tibble    3.2.1
✔ lubridate 1.9.3     ✔ tidyr     1.3.1
✔ purrr     1.0.2     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
 # permite realizar web scraping
library(rvest)

Adjuntando el paquete: 'rvest'

The following object is masked from 'package:readr':

    guess_encoding
# verificación de robots.txt para web scraping
library(polite)    

# Manejo de datos tipo texto
library(tidytext)

# manejo de cadenas de textos
library(stringr)

# Importar y guardar archivos planos de textos
library(readr)     
#Verificar permisos de Scraping del sitio web
url_bible <- "https://www.biblegateway.com/passage/?search=Apocalipsis%2022:19-21&version=RVR1960"
  url_bible %>%
  bow()
<polite session> https://www.biblegateway.com/passage/?search=Apocalipsis%2022:19-21&version=RVR1960
    User-agent: polite R package
    robots.txt: 5 rules are defined for 1 bots
   Crawl delay: 5 sec
  The path is scrapable for this user-agent

Vengo en Breve

Verso <-  read_html(url_bible) |> #Url de origen de la información a extraer
  html_element("#es-RVR1960-31103.text.Rev-22-20")|> #elemento extraido del código fuente de la página web que nos interesa
  html_text2()
Verso #Mostrar texto extraido
[1] "20 El que da testimonio de estas cosas dice: Ciertamente vengo en breve. Amén; sí, ven, Señor Jesús."

Bibliografía


Esta porcion profética ha sido extraida de : Biblegateway.com