diff --git a/DESCRIPTION b/DESCRIPTION index e344dcc..8eff8ca 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -34,4 +34,4 @@ Imports: RColorBrewer, ggthemes, zoo -RoxygenNote: 6.0.1 +RoxygenNote: 6.1.1 diff --git a/R/colors.r b/R/colors.r index 6dc4140..1b567c9 100644 --- a/R/colors.r +++ b/R/colors.r @@ -144,7 +144,7 @@ tau_color_economist <- function(tau, n=NULL) { #' #' @param tau taucharts object #' @param n number of desired colors -#' @param palette name of Few palette. One of \code{"medium"}, \code{"dark"} or \code{"light"} +#' @param palette name of Few palette. One of \code{"Medium"}, \code{"Dark"} or \code{"Light"} #' @references \url{http://api.taucharts.com/advanced/encoding.html} #' @export #' @seealso \code{\link[ggthemes]{few_pal}} @@ -152,7 +152,7 @@ tau_color_economist <- function(tau, n=NULL) { #' tauchart(mtcars) %>% #' tau_point("wt", "mpg", color="cyl") %>% #' tau_color_few() -tau_color_few <- function(tau, n=NULL, palette="medium") { +tau_color_few <- function(tau, n=NULL, palette="Medium") { tau$x$dimensions[tau$x$color] <- "category" if (is.null(n)) n <- length(unique(tau$x$datasource[[tau$x$color]])) values <- ggthemes::few_pal(palette)(n) diff --git a/man/tau_color_few.Rd b/man/tau_color_few.Rd index 42c76da..e77612f 100644 --- a/man/tau_color_few.Rd +++ b/man/tau_color_few.Rd @@ -4,14 +4,14 @@ \alias{tau_color_few} \title{Use the "Few" palette used in the charts} \usage{ -tau_color_few(tau, n = NULL, palette = "medium") +tau_color_few(tau, n = NULL, palette = "Medium") } \arguments{ \item{tau}{taucharts object} \item{n}{number of desired colors} -\item{palette}{name of Few palette. One of \code{"medium"}, \code{"dark"} or \code{"light"}} +\item{palette}{name of Few palette. One of \code{"Medium"}, \code{"Dark"} or \code{"Light"}} } \description{ Qualitative color palettes from Stephen Few, "Practical Rules for Using Color in Charts". diff --git a/man/tau_set_font.Rd b/man/tau_set_font.Rd index ed161c7..a265fd2 100644 --- a/man/tau_set_font.Rd +++ b/man/tau_set_font.Rd @@ -7,8 +7,8 @@ tau_set_font(tau, family = "OpenSans, 'Helvetica Neue', Helvetica, Arial, sans-serif", import_url = paste0(c("https://fonts.googleapis.com/css?family=Open+Sans:400,", - "400italic,600,700,600italic,700italic,800,300,300italic,800italic"), collapse - = "")) + "400italic,600,700,600italic,700italic,800,300,300italic,800italic"), + collapse = "")) } \arguments{ \item{tau}{taucharts object} diff --git a/man/tau_stacked_bar.Rd b/man/tau_stacked_bar.Rd index 364cd33..4a29e34 100644 --- a/man/tau_stacked_bar.Rd +++ b/man/tau_stacked_bar.Rd @@ -4,7 +4,8 @@ \alias{tau_stacked_bar} \title{Create a TauCharts stacked bar chart (experimental)} \usage{ -tau_stacked_bar(tau, x, y, color = NULL, size = NULL, horizontal = FALSE) +tau_stacked_bar(tau, x, y, color = NULL, size = NULL, + horizontal = FALSE) } \arguments{ \item{tau}{taucharts object}