Added arg to center title
This commit is contained in:
parent
9e6bfa2eb7
commit
73e3fa7c5d
1 changed files with 1 additions and 5 deletions
|
|
@ -16,10 +16,6 @@
|
||||||
#' @return A waffle chart
|
#' @return A waffle chart
|
||||||
#'
|
#'
|
||||||
#' @export
|
#' @export
|
||||||
#'
|
|
||||||
#' @example
|
|
||||||
#' df <- data.frame(category = c("Category 1", "Category 2", "Category 3"),proportion = c(15, 55, 30))
|
|
||||||
#' waffle(df, category, proportion, x_title = "A caption", title = "A title", subtitle = "A subtitle")
|
|
||||||
waffle <- function(df,
|
waffle <- function(df,
|
||||||
x,
|
x,
|
||||||
y,
|
y,
|
||||||
|
|
@ -36,7 +32,7 @@ waffle <- function(df,
|
||||||
axis_y = FALSE,
|
axis_y = FALSE,
|
||||||
legend_position = "bottom",
|
legend_position = "bottom",
|
||||||
legend_direction = "horizontal",
|
legend_direction = "horizontal",
|
||||||
hjust = 0.5)){
|
title_hjust = 0.5)){
|
||||||
|
|
||||||
# A basic and not robust check
|
# A basic and not robust check
|
||||||
# - add check between 0 and 1
|
# - add check between 0 and 1
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue