Extraer lista de Sismos de Ineter con R

En este post quiero mostrarle un truco para extraer la lista de los sismos del día desde la página del Ineter utilizando el programa R.

1.Instalar el paquete rvest y activarlo
2.Especificar la página web con el html de los datos que publica www.ineter.com, a este truco le llamaría barrer todo html en busca del origen de la información, es la página web que necesitamos.
3.Visualizar el html de origen de la información para ubicar el prefijo que separa la información que queremos.
4.Por último si quiero imprimir en la consola solo ejecuto datos, a pesar de que mi última línea ha creado un archivo de txt llamado Sismos en mis documentos para que ubiques y lo habras.

##########################################
install.packages(“rvest”)
library(rvest)
Sismos <- html(“http://webserver2.ineter.gob.ni/geofisica/sis/events/sismos.php”)
datos <- Sismos %>%
html_nodes(“pre”) %>%
html_text()
write.table(datos, ‘Sismos.txt’, sep=’\t’)
############################################

Para visualizar los html ejecute:
html(“http://www.ineter.gob.ni“)
html(“http://webserver2.ineter.gob.ni/geofisica/sis/events/sismos.php”)

 

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos necesarios están marcados *


*

Puedes usar las siguientes etiquetas y atributos HTML: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

Protected by WP Anti Spam