data-raw/get_eq_raw.R

file_url <- "https://www.ngdc.noaa.gov/nndc/struts/results?type_0=Exact&query_0=$ID&t=101650&s=13&d=189&dfn=signif.txt"
eq <- read.delim(file_url)
kaquilino/eqvis documentation built on July 20, 2017, 6:32 a.m.