Visualize Wine qualities with Radar Plot in ggplot2

Here we visualize wine attributes with a radar plot using the ggradar package.

library(ggplot2)library(dplyr)
# devtools::install_github("ricardo-bion/ggradar",# dependencies = TRUE)library(ggradar)
# create a toy examplewine <- tibble(wine = c("A", "B"), Fruity = c(4, 6), Acidic = c(2, 6), Oaky = c(2, 5), Tannic = c(5, 1), Sweet = c(5, 2), Body = c(6, 3))wine

Output:

# A tibble: 2 × 7
wine Fruity Acidic Oaky Tannic Sweet Body
<chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
1 A 4 2 2 5 5 6
2 B 6 6 5 1 2 3
wine %>%   ggradar(    # The circular outlines:    # min to max: 1-6; and merge the circular min and mid line    grid.min = 1, grid.mid = 1, grid.max = 6,     # values to display on the circular outline    values.radar = c(1, 1, 6),     # not show the middle level circular outline    label.gridline.mid = F,         # set the min and mid (merged) circular outline    gridline.max.colour = "salmon1",    gridline.mid.colour = "salmon1",         # radiant lines    axis.line.colour = "salmon1",         # radar background    background.circle.colour = "gold",    background.circle.transparency = .05,        # the polygon color    fill = T, fill.alpha = .1   ) +    theme(legend.position = "none") +  annotate(geom = "text",            x = c(-7.5, 5),            y = c(.3, 5.5),            label = c("wine of\nchampion", "wine of\nglory"),            color = c("red4", "purple4"),            fontface = "bold", size = 6) 




Continue Exploring — 🚀 one level up!


Check out the following article that visualizes the global flights and airports illustrated below. And also check how to modify the script to turn static flight lines into animation.



Learn how to create this awesome stacked ribbon / alluvium plot, which shows dynamic shifts in the migrant population to the United States from 1820 to 2009.



Check out how to generate exploded donut plots in a U.S. map layout that visualizes the state-wise voting results of the 2016 Presidential Election between Hillary Clinton and Donald Trump .