commit | 161a86ac9f1310efb9105be3224fcd570cf92cb9 | [log] [tgz] |
---|---|---|
author | Marc Kupietz <kupietz@ids-mannheim.de> | Tue Feb 02 14:40:23 2021 +0100 |
committer | Marc Kupietz <kupietz@ids-mannheim.de> | Tue Feb 02 14:56:01 2021 +0100 |
tree | d6d18379b1ef2200c32f5d4573e493df7208463a | |
parent | e8d0a8efec1cc08e9471f364c5249b3d72cdf9b9 [diff] |
Provide palettes as functions Change-Id: Idc93e5c4538233ceaf248530e98a20cdcac38764
The package provides a collection themes for different plotting libraries, following the corporate design of the Leibniz Institute for the German Language (IDS) in Mannheim (Germany).
library(devtools) install_git("https://korap.ids-mannheim.de/gerrit/IDS-Mannheim/idsThemeR")
library(tidyverse) library(highcharter) library(idsThemeR) highcharts_demo() %>% hc_add_theme(hc_theme_ids_light())
library(ggplot2) library(idsThemeR) dtemp <- data.frame(months = factor(rep(substr(month.name, 1, 3), 4), levels = substr(month.name, 1, 3)), city = rep(c("Tokyo", "New York", "Berlin", "London"), each = 12), temp = c(7.0, 6.9, 9.5, 14.5, 18.2, 21.5, 25.2, 26.5, 23.3, 18.3, 13.9, 9.6, -0.2, 0.8, 5.7, 11.3, 17.0, 22.0, 24.8, 24.1, 20.1, 14.1, 8.6, 2.5, -0.9, 0.6, 3.5, 8.4, 13.5, 17.0, 18.6, 17.9, 14.3, 9.0, 3.9, 1.0, 3.9, 4.2, 5.7, 8.5, 11.9, 15.2, 17.0, 16.6, 14.2, 10.3, 6.6, 4.8)) ggplot(dtemp, aes(x = months, y = temp, group = city, color = city)) + geom_line() + geom_point(size = 1.1) + ggtitle("Monthly Average Temperature") + theme_ids(style="dark") + scale_colour_ids(palette="D3")
dtemp <- data.frame(Months = factor(rep(substr(month.name, 1, 3), 4), levels = substr(month.name, 1, 3)), City = rep(c("Tokyo", "New York", "Berlin", "London"), each = 12), Temperature = c(7.0, 6.9, 9.5, 14.5, 18.2, 21.5, 25.2, 26.5, 23.3, 18.3, 13.9, 9.6, -0.2, 0.8, 5.7, 11.3, 17.0, 22.0, 24.8, 24.1, 20.1, 14.1, 8.6, 2.5, -0.9, 0.6, 3.5, 8.4, 13.5, 17.0, 18.6, 17.9, 14.3, 9.0, 3.9, 1.0, 3.9, 4.2, 5.7, 8.5, 11.9, 15.2, 17.0, 16.6, 14.2, 10.3, 6.6, 4.8)) ggplot(dtemp, aes(x = Months, y = Temperature, group = City, color = City)) + geom_line() + geom_point(size = 1.1) + ggtitle("Monthly Average Temperature", subtitle="Source: WorldClimate.com") + theme_ids() + scale_colour_ids()
library(scales) show_col(ids_pal()(20))
This palette should be used if the original palette colours can be misinterpreted as department colours.
library(scales) show_col(ids_pal(palette="D3")(20))
More elaborate R scripts demonstrating the use of the package can be found in the demo folder.
See Changelog
Authors: Marc Kupietz
Copyright (c) 2020, Leibniz Institute for the German Language, Mannheim, Germany
This package is developed as part of the KorAP Corpus Analysis Platform at the Leibniz Institute for German Language (IDS).
It is published under the BSD-2 License.
idsThemeR imports the highcharter package which has a dependency on Highcharts, a commercial JavaScript charting library. Highcharts offers both a commercial license as well as a free non-commercial license. Please review the licensing options and terms before using the highcharter plot options, as the idsThemeR
license neither provides nor implies a license for Highcharts.
Highcharts is a Highsoft product which is not free for commercial and governmental use.
Contributions are very welcome!
Your contributions should be committed via our Gerrit server to facilitate reviewing (see Gerrit Code Review - A Quick Introduction).
Please note that unless you explicitly state otherwise any contribution intentionally submitted for inclusion into this software shall – as this software itself – be under the BSD-2 License.