Browse Source

dark

tags/0.8.0
boB Rudis 6 years ago
parent
commit
22da9f032b
No known key found for this signature in database GPG Key ID: 1D7529BE14E2BBA9
  1. 2
      DESCRIPTION
  2. 2
      R/color.r
  3. 19
      R/modern.r
  4. 4
      R/zzz.r
  5. 18
      cran-comments.md
  6. 50
      man/scale_ipsum.Rd

2
DESCRIPTION

@ -11,7 +11,7 @@ Authors@R: c(
person("Dan", "Wilson", email = "dan@thedatacollective.com.au",
role = c("ctb"), comment = c("Secondary axis support")),
person("Xavier", "Adam", role = c("ctb")),
person("Google", comment = "Roboto Condensed & Titillium Web Fonts0",
person("Google", comment = "Roboto Condensed & Titillium Web Fonts",
role = c("cph")),
person("IBM", comment = "Plex Sans Font", role = c("cph")),
person("Jacob", "Barnett", email = "jacob.r.barnett@gmail.com", role = c("ctb")),

2
R/color.r

@ -13,7 +13,7 @@ ipsum_pal <- function() { manual_pal(ipsum_palette) }
#' See [ipsum_pal]().
#'
#' @md
#' @inheritParams ggplot2::scale_colour_hue
#' @inheritDotParams ggplot2::discrete_scale -expand -position
#' @rdname scale_ipsum
#' @export
scale_colour_ipsum <- function(...) { discrete_scale("colour", "ipsum", ipsum_pal(), ...) }

19
R/modern.r

@ -13,7 +13,16 @@ theme_modern_rc <- function (base_family = "Roboto Condensed", base_size = 11.5,
axis_title_size = 9, axis_title_face = "plain", axis_title_just = "rt",
plot_margin = margin(30, 30, 30, 30), grid = TRUE, axis = FALSE, ticks = FALSE) {
grid_col <- axis_col <- "white"
grid_col <- axis_col <- "#333333"
ggplot2::update_geom_defaults("point", list(colour = "white"))
ggplot2::update_geom_defaults("line", list(colour = "white"))
ggplot2::update_geom_defaults("area", list(colour = "white", fill="white"))
ggplot2::update_geom_defaults("rect", list(colour = "white", fill="white"))
ggplot2::update_geom_defaults("density", list(colour = "white", fill="white"))
ggplot2::update_geom_defaults("bar", list(colour = "white", fill="white"))
ggplot2::update_geom_defaults("col", list(colour = "white", fill="white"))
ggplot2::update_geom_defaults("text", list(colour = "white"))
ret <- ggplot2::theme_minimal(base_family=base_family, base_size=base_size)
@ -95,10 +104,10 @@ theme_modern_rc <- function (base_family = "Roboto Condensed", base_size = 11.5,
ret <- ret + theme(plot.margin=plot_margin)
ret <- ret +
theme(rect = element_rect(fill = "#0f0f0f", color = "#0f0f0f")) +
theme(plot.background = element_rect(fill = "#0f0f0f", color = "#0f0f0f")) +
theme(panel.background = element_rect(fill = "#0f0f0f", color = "#0f0f0f")) +
theme(rect = element_rect(fill = "#0f0f0f", color = "#0f0f0f")) +
theme(rect = element_rect(fill = "#1c1c1c", color = "#1c1c1c")) +
theme(plot.background = element_rect(fill = "#1c1c1c", color = "#1c1c1c")) +
theme(panel.background = element_rect(fill = "#1c1c1c", color = "#1c1c1c")) +
theme(rect = element_rect(fill = "#1c1c1c", color = "#1c1c1c")) +
theme(text = element_text(color = "white")) +
theme(axis.text = element_text(color = "white")) +
theme(title = element_text(color = "white")) +

4
R/zzz.r

@ -19,8 +19,8 @@
}
fnt <- extrafont::fonttable()
if (!any(grepl("Arial[ ]Narrow|Roboto[ ]Condensed", fnt$FamilyName))) {
packageStartupMessage("NOTE: Either Arial Narrow or Roboto Condensed fonts are *required* to use these themes.")
if (!any(grepl("Fira[ ]*Sans[ ]*Condensed|Fira[ ]*Mono", fnt$FamilyName))) {
packageStartupMessage("NOTE: Fira Sans Condensed/Fira Mono fonts are *required* to use these themes.")
packageStartupMessage(" Please use hrbrthemes::import_roboto_condensed() to install Roboto Condensed and")
packageStartupMessage(" if Arial Narrow is not on your system, please see http://bit.ly/arialnarrow")
} # nocov end

18
cran-comments.md

@ -1,6 +1,8 @@
## Test environments
* local OS X install + travis-ci, R 3.5.0 & devel
* local OS X install + travis-ci, R 3.5.0 & devel (Travis is currently failing
- if folks check - due to a missing CRAN mirror component in RStudio's CRAN
mirror for Travis)
* ubuntu 14.04 (on travis-ci), R oldrel, current, devel
* win-builder (devel and release)
* rhub::check_for_cran()
@ -9,13 +11,21 @@
0 errors | 0 warnings | 0 notes
r-hub CRAN check notes "Author field differs from that derived from Authors@R"
due to the ORCID id auto-expansion to a URL.
* This is an update and CRAN-fix release.
## Reverse dependencies
- BAwiR
- fontHind
- fontMPlus
- BAwiR - ok
- fontHind - ok
- fontMPlus - ok
---
- new fonts and R markdown theme added
- some new utilities for ggplot2 themes
- fixed CRAN check errors on ubuntu (at least that's what all the
third-party testing sites tell me since it does not toss that
error on them)

50
man/scale_ipsum.Rd

@ -13,28 +13,8 @@ scale_color_ipsum(...)
scale_fill_ipsum(...)
}
\arguments{
\item{...}{Arguments passed on to \code{discrete_scale}
\item{...}{Arguments passed on to \code{ggplot2::discrete_scale}
\describe{
\item{breaks}{One of:
\itemize{
\item \code{NULL} for no breaks
\item \code{waiver()} for the default breaks computed by the
transformation object
\item A character vector of breaks
\item A function that takes the limits as input and returns breaks
as output
}}
\item{limits}{A character vector that defines possible values of the scale
and their order.}
\item{drop}{Should unused factor levels be omitted from the scale?
The default, \code{TRUE}, uses the levels that appear in the data;
\code{FALSE} uses all the levels in the factor.}
\item{na.translate}{Unlike continuous scales, discrete scales can easily show
missing values, and do so by default. If you want to remove missing values
from a discrete scale, specify \code{na.translate = FALSE}.}
\item{na.value}{If \code{na.translate = TRUE}, what value aesthetic
value should missing be displayed as? Does not apply to position scales
where \code{NA} is always placed at the far right.}
\item{aesthetics}{The names of the aesthetics that this scale works with}
\item{scale_name}{The name of the scale}
\item{palette}{A palette function that when called with a single integer
@ -44,6 +24,15 @@ they should take}
\code{waiver()}, the default, the name of the scale is taken from the first
mapping used for that aesthetic. If \code{NULL}, the legend title will be
omitted.}
\item{breaks}{One of:
\itemize{
\item \code{NULL} for no breaks
\item \code{waiver()} for the default breaks computed by the
transformation object
\item A character vector of breaks
\item A function that takes the limits as input and returns breaks
as output
}}
\item{labels}{One of:
\itemize{
\item \code{NULL} for no labels
@ -53,16 +42,19 @@ transformation object
\item A function that takes the breaks as input and returns labels
as output
}}
\item{expand}{Vector of range expansion constants used to add some
padding around the data, to ensure that they are placed some distance
away from the axes. Use the convenience function \code{\link[=expand_scale]{expand_scale()}}
to generate the values for the \code{expand} argument. The defaults are to
expand the scale by 5\% on each side for continuous variables, and by
0.6 units on each side for discrete variables.}
\item{limits}{A character vector that defines possible values of the scale
and their order.}
\item{na.translate}{Unlike continuous scales, discrete scales can easily show
missing values, and do so by default. If you want to remove missing values
from a discrete scale, specify \code{na.translate = FALSE}.}
\item{na.value}{If \code{na.translate = TRUE}, what value aesthetic
value should missing be displayed as? Does not apply to position scales
where \code{NA} is always placed at the far right.}
\item{drop}{Should unused factor levels be omitted from the scale?
The default, \code{TRUE}, uses the levels that appear in the data;
\code{FALSE} uses all the levels in the factor.}
\item{guide}{A function used to create a guide or its name. See
\code{\link[=guides]{guides()}} for more info.}
\item{position}{The position of the axis. "left" or "right" for vertical
scales, "top" or "bottom" for horizontal scales}
\item{super}{The super class to use for the constructed scale}
}}
}

Loading…
Cancel
Save