Try building the plot,
g <- ggplot_build(p)
unique(g$data[[1]]["fill"])
fill
1 #1B9E77
16 #D95F02
28 #7570B3
More Related Contents:
- Position geom_text on dodged barplot
- Save multiple ggplots using a for loop
- Plotting contours on an irregular grid
- How to merge color, line style and shape legends in ggplot
- ggplot2 keep unused levels barplot
- geom_bar bars not displaying when specifying ylim
- R stacked percentage bar plot with percentage of binary factor and labels (with ggplot)
- plotting smooth line through all data points
- ggplot2 geom_bar – how to keep order of data.frame [duplicate]
- Extract data from a ggplot
- Subset and ggplot2
- ggplot2: Curly braces on an axis?
- Changing whisker definition in geom_boxplot
- Fill and border colour in geom_point (scale_colour_manual) in ggplot
- cut function in R- labeling without scientific notations for use in ggplot2
- R ggplot2 merge with shapefile and csv data to fill polygons
- pass function arguments to both dplyr and ggplot
- Show frequencies along with barplot in ggplot2
- ggplot2: Changing the order of stacks on a bar graph
- Center Plot title in ggplot2
- Removing one tableGrob when applied to a box plot with a facet_wrap
- How to make geom_text plot within the canvas’s bounds
- Saving grid.arrange() plot to file
- How to plot a Stacked and grouped bar chart in ggplot?
- Set the plot title to wrap around and shrink the text to fit the plot
- Overlay two ggplot2 stat_density2d plots with alpha channels
- Sort legend in ggplot2
- The perils of aligning plots in ggplot
- How do I loop through column names and make a ggplot scatteplot for each one
- How to use superscript in axis labels with ggplot2