https://rivasiker.github.io/ggHoriPlot/

A user-friendly, highly customizable R package for building horizon plots in ggplot2
https://rivasiker.github.io/ggHoriPlot/

data-science data-visualization ggplot2 horizon-plots r r-package

Last synced: about 1 month ago
JSON representation

A user-friendly, highly customizable R package for building horizon plots in ggplot2

• Host: GitHub
• URL: https://rivasiker.github.io/ggHoriPlot/
• Owner: rivasiker
• Created: 2021-03-16T12:21:34.000Z (almost 4 years ago)
• Default Branch: master
• Last Pushed: 2024-07-12T08:59:47.000Z (5 months ago)
• Last Synced: 2024-10-28T17:24:00.248Z (about 2 months ago)
• Topics: data-science, data-visualization, ggplot2, horizon-plots, r, r-package
• Language: R
• Homepage: https://rivasiker.github.io/ggHoriPlot/
• Size: 36.3 MB
• Stars: 143
• Watchers: 2
• Forks: 4
• Open Issues: 1
• Metadata Files:
  • Readme: README.Rmd
  • Changelog: NEWS.md

Awesome Lists containing this project

README

        
---

output: github_document

---

```{r, echo = FALSE}

knitr::opts_chunk$set(

  collapse = TRUE,

  comment = "#>",

  fig.path = "man/figures/"

)

```

# ggHoriPlot: horizon plots in ggplot2 

[![R-CMD-check](https://github.com/rivasiker/ggHoriPlot/actions/workflows/check-standard.yaml/badge.svg)](https://github.com/rivasiker/ggHoriPlot/actions/workflows/check-standard.yaml)

[![CRAN](https://www.r-pkg.org/badges/version/ggHoriPlot)](https://CRAN.R-project.org/package=ggHoriPlot)

[![downloads](https://cranlogs.r-pkg.org/badges/grand-total/ggHoriPlot)](https://CRAN.R-project.org/package=ggHoriPlot)

[![codecov](https://codecov.io/gh/rivasiker/ggHoriPlot/branch/master/graph/badge.svg?token=8V5E63YVM2)](https://app.codecov.io/gh/rivasiker/ggHoriPlot)

This package allows building horizon plots in ggplot2. You can learn more about the package in `vignette("ggHoriPlot")`.

## Installation

You can install `ggHoriPlot` from CRAN via:

``` r

install.packages("ggHoriPlot")

```

You can also install the development version of the package from GitHub with the following command:

``` r

#install.packages("devtools")

devtools::install_github("rivasiker/ggHoriPlot")

```

## Basic example

Load the libraries:

```{r libraries, warning=FALSE, message=FALSE}

library(tidyverse)

library(ggHoriPlot) 

library(ggthemes)

```

Load the dataset and calculate the cutpoints and origin:

```{r set}

utils::data(climate_CPH)

cutpoints <- climate_CPH  %>% 

  mutate(

    outlier = between(

      AvgTemperature, 

      quantile(AvgTemperature, 0.25, na.rm=T)-

        1.5*IQR(AvgTemperature, na.rm=T),

      quantile(AvgTemperature, 0.75, na.rm=T)+

        1.5*IQR(AvgTemperature, na.rm=T))) %>% 

  filter(outlier)

ori <- sum(range(cutpoints$AvgTemperature))/2

sca <- seq(range(cutpoints$AvgTemperature)[1], 

           range(cutpoints$AvgTemperature)[2], 

           length.out = 7)[-4]

round(ori, 2) # The origin

round(sca, 2) # The horizon scale cutpoints

```

Build the horizon plots in `ggplot2` using `geom_horizon()`:

```{r CPH_climate}

climate_CPH %>% ggplot() +

  geom_horizon(aes(date_mine, 

                   AvgTemperature,

                   fill = ..Cutpoints..), 

               origin = ori, horizonscale = sca) +

  scale_fill_hcl(palette = 'RdBu', reverse = T) +

  facet_grid(Year~.) +

  theme_few() +

  theme(

    panel.spacing.y=unit(0, "lines"),

    strip.text.y = element_text(size = 7, angle = 0, hjust = 0),

    axis.text.y = element_blank(),

    axis.title.y = element_blank(),

    axis.ticks.y = element_blank(),

    panel.border = element_blank()

    ) +

  scale_x_date(expand=c(0,0), 

               date_breaks = "1 month", 

               date_labels = "%b") +

  xlab('Date') +

  ggtitle('Average daily temperature in Copenhagen', 

          'from 1995 to 2019')

```

## Learn more

You can check out the full functionality of `ggHoriPlot` in the following guides:

  - [Getting started](https://rivasiker.github.io/ggHoriPlot/articles/ggHoriPlot.html)

  - [Examples with real data](https://rivasiker.github.io/ggHoriPlot/articles/examples.html)