Análisis de sismos

1 Introducción

En este documento, mostramos el análisis de la base de datos quakes

2 Carga de datos

library(datasets)
datos <- quakes

Vista previa de los datos:

library(DT)
datatable(datos)

Los datos sobre los sismos tienen la siguiente dimensión:

dim(datos)

## [1] 1000    5

2.1 Exploración

2.1.1 Magnitud

library(ggplot2)
library(plotly)
plot <- datos %>% ggplot(aes(x=mag)) + geom_histogram()
ggplotly(plot)

2.1.2 Mapa de sismos

Se muestra el mapa con la ubicación de los sismos a contiuación

library(leaflet)
leaflet() %>%     # Inicialización
  addTiles() %>%  # Añadir mapa.
  addMarkers(lng = as.numeric(as.character(datos$long)),
             lat = as.numeric(as.character(datos$lat)),
             clusterOptions = markerClusterOptions() # Agrupar al alejar 
             )