Vertical bar ggplot that is coloured, but not facetted.
ggplot_vbar_col(data, x_var, y_var, col_var, text_var = NULL,
position = "stack", pal = NULL, pal_rev = FALSE, width = 0.75,
alpha = 1, size_line = 0.5, title = "[Title]", title_wrap = 70,
subtitle = NULL, subtitle_wrap = 80, x_expand = NULL,
x_labels = waiver(), x_pretty_n = 6, x_title = "[X title]",
x_title_wrap = 50, y_balance = FALSE, y_expand = NULL,
y_labels = waiver(), y_pretty_n = 5, y_title = "[Y title]",
y_title_wrap = 50, y_trans = "identity", y_zero = TRUE,
y_zero_line = NULL, col_labels = NULL, col_legend_ncol = NULL,
col_legend_nrow = NULL, col_na = TRUE, col_rev = FALSE,
col_title = "", col_title_wrap = 25, caption = NULL,
caption_wrap = 80, font_family = "Helvetica",
font_size_title = NULL, font_size_body = NULL, mobile = FALSE)A tibble or dataframe. Required input.
Unquoted numeric, date or categorical variable to be on the x axis. Required input.
Unquoted numeric variable to be on the y axis. Required input.
Unquoted categorical variable to colour the bars. Required input.
Unquoted variable to be used as a customised tooltip in combination with plotly::ggplotly(plot, tooltip = "text"). Defaults to NULL.
Whether bars are positioned by "stack" or "dodge". Defaults to "stack".
Character vector of hex codes. Defaults to NULL, which selects a default palette.
Reverses the palette. Defaults to FALSE.
Width of bars. Defaults to 0.75.
The alpha of the fill. Defaults to 1.
The size of the outlines of bars.
Title string. Defaults to [Title].
Number of characters to wrap the title to. Defaults to 70. Not applicable where mobile equals TRUE.
Subtitle string. Defaults to [Subtitle].
Number of characters to wrap the subtitle to. Defaults to 80. Not applicable where mobile equals TRUE.
A vector of range expansion constants used to add some padding on the x scale.
Adjust the x scale labels through a function or vector.
The desired number of intervals on the x axis, as calculated by the pretty algorithm. Defaults to 6. Not applicable where mobile equals TRUE.
X axis title string. Defaults to [X title].
Number of characters to wrap the x title to. Defaults to 50. Not applicable where mobile equals TRUE.
Add balance to the y axis so that zero is in the centre of the y scale.
A vector of range expansion constants used to add some padding on the y scale.
Adjust the y scale labels through a function or vector.
The desired number of intervals on the y axis, as calculated by the pretty algorithm. Defaults to 5.
Y axis title string. Defaults to [Y title].
Number of characters to wrap the y title to. Defaults to 50. Not applicable where mobile equals TRUE.
A string specifying a transformation for the y axis scale, such as "log10" or "sqrt". Defaults to "identity".
TRUE or FALSE of whether the minimum of the y scale is zero. Defaults to TRUE.
TRUE or FALSE whether to add a zero reference line to the y axis. TRUE if there are positive and negative values in y_var. Otherwise defaults to FALSE.
Adjust the colour scale labels through a vector.
The number of columns in the legend.
The number of rows in the legend.
TRUE or FALSE of whether to show NA values of the colour variable. Defaults to TRUE.
TRUE or FALSE of whether the colour scale is reversed. Defaults to FALSE. Defaults to FALSE.
Colour title string for the legend. Defaults to NULL.
Number of characters to wrap the colour title to. Defaults to 25. Not applicable where mobile equals TRUE.
Caption title string. Defaults to NULL.
Number of characters to wrap the caption to. Defaults to 80. Not applicable where mobile equals TRUE.
Font family to use. Defaults to "Helvetica".
Font size for the title text. Defaults to 11.
Font size for all text other than the title. Defaults to 10.
Whether the plot is to be displayed on a mobile device. Defaults to FALSE. If within an app with the mobileDetect function, then use mobile = input$isMobile.
A ggplot object.
# NOT RUN {
library(dplyr)
plot_data <- storms %>%
mutate(status = stringr::str_to_sentence(status)) %>%
group_by(year, status) %>%
summarise(average_wind = round(mean(wind), 2))
ggplot_vbar_col(plot_data, year, average_wind, status)
# }
Run the code above in your browser using DataLab