全球地震分布可视化 - 使用R语言的Shiny应用

全球地震分布可视化 - 使用R语言的Shiny应用

地震是地球上常见的自然灾害之一，了解全球地震的分布情况对于地质学家、地震学家以及相关研究人员具有重要意义。在本文中，我们将介绍如何使用R语言的Shiny包来创建一个交互式应用，用于可视化全球地震分布。通过这个应用，用户可以浏览地震事件的发生位置、强度和深度等信息，并根据自己的需求进行筛选和探索。

首先，我们需要准备相应的数据集。全球地震数据可以从美国地质调查局（US Geological Survey，USGS）的地震事件目录中获取。USGS提供了一个公开的地震事件API，我们可以使用R语言的httr包来获取数据。以下是获取地震数据并进行简单处理的代码：

library(httr)
library(jsonlite)

# 使用USGS地震事件API获取数据
url <- "https://earthquake.usgs.gov/fdsnws/event/1/query?format=geojson&starttime=2020-01-01&endtime=2023-08-25&minmagnitude=4"
response <- GET(url)
data <- content(response, "text")
earthquakes <- fromJSON(data)$features

# 提取地震事件的经纬度、震级和深度信息
locations <- sapply(earthquakes, function(x) x$geometry$coordinates[1:2])
magnitudes <- sapply(earthquakes, function(x) x$properties$mag)
depths <- sapply(earthquakes, function(x) x