创建地平线图

Geo*_*-sp -1 r ggplot2 lattice

我有以下示例数据,想要创建一个地平线图,area显示year. 有什么建议使用这样做吗ggplot2

year <- 1990:2005
area1 <- runif(16, 18,20)
area2 <- runif (16,6,6.7)
area3 <- runif(16, 7,8)
dat <- data.frame(year, area1, area2, area3)
Run Code Online (Sandbox Code Playgroud)

eip*_*i10 5

ggplot_horizon您可以使用包中的内容创建地平线图ggTimeSeries。对于良好的地平线图而言,您的数据样本有点稀疏,因此我创建了一些假数据。下面的示例基于ggTimeSeries小插图中的示例。

# Fake data
set.seed(1)
df = data.frame(x = rep(1:1000,3), y = cumsum(rnorm(3000)) + 50, 
                group=rep(LETTERS[1:3], each=1000))

#devtools::install_github("Ather-Energy/ggTimeSeries")
#install.packages("viridis")
library(ggTimeSeries)
library(viridis)

ggplot_horizon(df, 'x', 'y', vcGroupingColumnNames='group', bandwidth=10) +
  facet_grid(group ~ .) +
  scale_fill_viridis(option="inferno") 
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述