get_legend: Extract Legends from a ggplot object
In YTLogos/ggpubr: 'ggplot2' Based Publication Ready Plots

Description Usage Arguments Value Examples

Extract the legend labels from a ggplot object.

1	get_legend(p)

`p`	an object of class ggplot.

an object of class gtable.

# Create a scatter plot
p <- ggscatter(iris, x = "Sepal.Length", y = "Sepal.Width",
        color = "Species", palette = "jco",
        ggtheme = theme_minimal())
p

# Extract the legend. Returns a gtable
leg <- get_legend(p)

# Convert to a ggplot and print
as_ggplot(leg)