geom_timeline_label: geom_timeline_label

In marcelamu95/earthquakeGeoms:

Description

GeomTimeLineLabel Geom coding

Usage

geom_timeline_label(mapping = NULL, data = NULL, stat = "identity",
  position = "identity", na.rm = FALSE, show.legend = NA,
  inherit.aes = TRUE, n_max = 5, ...)

Arguments

mapping	Mapping argument to the ggplot layer function.
data	A Dataframe Object containing the data to plot.
stat	Stat argument to the ggplot layer function.
position	Position argument to the ggplot layer function.
na.rm	na.rm argument to the ggplot layer function.
show.legend	show.legend argument to the ggplot layer function.
inherit.aes	inherit.aes argument to the ggplot layer function.
n_max	maximum number of tags
...	Extra Params.

Value

for adding annotations to the earthquake data

Examples

 ## Not run: 

filename <- system.file("extdata", "signif.txt", package="earthquakeGeoms")
library(readr)
input <- readr::read_delim(filename, delim = "\t")

 sample <- input %>%
 eq_clean_data() %>%
 eq_location_clean("LOCATION_NAME")%>%
 filter(YEAR >= 2000) %>%
 filter(COUNTRY %in% c("USA", "MEXICO"))

 ggplot(data = sample, aes(x=date,y=COUNTRY, label=LOCATION_NAME)) +
 geom_timeline() +
 geom_timeline_label(data=sample,aes(label=LOCATION_NAME),n_max=8) +
 scale_size_continuous(name = 'Richter scale value', guide = guide_legend(order = 1)) +
 geom_timeline(aes(y = COUNTRY, color=DEATHS, size = EQ_PRIMARY)) +
 scale_color_continuous(name = '# of Deaths', guide = guide_colorbar(order = 2)) +
 new_theme()

## End(Not run)

marcelamu95/earthquakeGeoms documentation built on Nov. 21, 2019, 4:46 a.m.