How can I add hatches, stripes or another pattern or texture to a barplot in ggplot?

by

One approach is to use the ggpattern package written by Mike FC (no affiliation):

library(ggplot2)
#remotes::install_github("coolbutuseless/ggpattern")
library(ggpattern)
ggplot(data = df, aes(x = Class, fill = StudyTime, pattern = Nerd)) +
  geom_bar_pattern(position = position_dodge(preserve = "single"),
                   color = "black", 
                   pattern_fill = "black",
                   pattern_angle = 45,
                   pattern_density = 0.1,
                   pattern_spacing = 0.025,
                   pattern_key_scale_factor = 0.6) + 
  scale_fill_manual(values = colorRampPalette(c("#0066CC","#FFFFFF","#FF8C00"))(4)) +
  scale_pattern_manual(values = c(Nerd = "stripe", NotNerd = "none")) +
  labs(x = "Class", y = "Number of Students", pattern = "Nerd?") + 
  guides(pattern = guide_legend(override.aes = list(fill = "white")),
         fill = guide_legend(override.aes = list(pattern = "none")))

enter image description here

The package appears to support a number of common geometries. Here is an example of using geom_tile to combine a continuous variable with a categorical variable:

set.seed(40)
df2 <- data.frame(Row = rep(1:9,times=9), Column = rep(1:9,each=9),
                   Evaporation = runif(81,50,100),
                   TreeCover = sample(c("Yes", "No"), 81, prob = c(0.3,0.7), replace = TRUE))

ggplot(data=df2, aes(x=as.factor(Row), y=as.factor(Column),
                     pattern = TreeCover, fill= Evaporation)) +
  geom_tile_pattern(pattern_color = NA,
                    pattern_fill = "black",
                    pattern_angle = 45,
                    pattern_density = 0.5,
                    pattern_spacing = 0.025,
                    pattern_key_scale_factor = 1) +
  scale_pattern_manual(values = c(Yes = "circle", No = "none")) +
  scale_fill_gradient(low="#0066CC", high="#FF8C00") +
  coord_equal() + 
  labs(x = "Row",y = "Column") + 
  guides(pattern = guide_legend(override.aes = list(fill = "white")))

enter image description here

More Related Contents:

  1. Multirow axis labels with nested grouping variables
  2. Position geom_text on dodged barplot
  3. Put stars on ggplot barplots and boxplots – to indicate the level of significance (p-value)
  4. Stacked Bar Plot in R
  5. Reverse stacked bar order
  6. How to put labels over geom_bar for each bar in R with ggplot2
  7. Grouped bar plot in ggplot
  8. How can I change the Y-axis figures into percentages in a barplot?
  9. How to center stacked percent barchart labels
  10. Plotting bar charts on map using ggplot2?
  11. How to produce stacked bars within grouped barchart in R [duplicate]
  12. Grouped barplot in R with error bars
  13. Alignment of numbers on the individual bars
  14. Combining Bar and Line chart (double axis) in ggplot2
  15. draw the sum value above the stacked bar in ggplot2
  16. ggplot2 3D Bar Plot
  17. Plotting a stacked bar plot?
  18. R ggplot2: stat_count() must not be used with a y aesthetic error in Bar graph
  19. ggplot2 : Plot mean with geom_bar
  20. How to align the bars of a histogram with the x axis?
  21. How to plot a Stacked and grouped bar chart in ggplot?
  22. Add percentage labels to a stacked barplot
  23. ggplot2: Setting geom_bar baseline to 1 instead of zero
  24. How to overlay two geom_bar?
  25. Bars in geom_bar have unwanted different widths when using facet_wrap
  26. ggplot multiple grouping bar
  27. Drawing a barchart to compare two sets of data using ggplot2 package?
  28. How to order bars within all facets?
  29. Bar plot, no space between bottom of geom and x axis keep space above
  30. How to get a barplot with several variables side by side grouped by a factor

Leave a Comment