title: How to format a radar chart in R with axis labels and rotation using ggplot2
body: <p>I have a radar chart in r that shows percentages by month.   I would like to </p>
  
  <ul>
  <li>change the chart so that Jan starts at 90% angle rather than rotated
  to the right</li>
  <li>change the chart so that the labels for the percentages show up in the chart rather than on the left side</li>
  </ul>
  
  <p>The bad chart is below</p>
  
  <p><a href="https://i.stack.imgur.com/0MTRk.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/0MTRk.png" alt="Rad Bad"></a></p>
  
  <p>The good chart I would like to replicate is below</p>
  
  <p><a href="https://i.stack.imgur.com/HuYIT.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/HuYIT.png" alt="enter image description here"></a></p>
  
  <p>The code for the radar chart is below</p>
  
  <pre><code>library(reshape2)
  library(ggplot2)
  library(dplyr)
  
  Group &lt;- factor(c("Jan", "Feb", "Mar", "Apr", "May", "Jun",
                    "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"),
                  levels = c("Jan", "Feb", "Mar", "Apr", "May", "Jun",
                             "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"))
  Urban &lt;- c(-0.61, 0.13, 0.24, -0.30, -0.12, -1.24, 0.74, 0.55, 0.80, .2, .2, .2)
  Rural &lt;- c(1.02, -0.40, 0.73, 0.17, 0.68, 1.21, -1.35, -0.84, -1.27, .2, .2, .2)
  Total &lt;- c(0.41, -0.27, 0.97, -0.13, 0.56, -0.03, -0.61, -0.29, -0.47, 0.4, 0.4, 0.4)
  
  # data preparation
  df = data.frame(Group = Group,
                  Urban = Urban,
                  Rural = Rural,
                  Total = Total)    
  df.m &lt;- melt(df, 
               id.vars = c("Group"), 
               measure.vars = c("Urban", "Rural","Total"),
               variable.name = "Demographics",
               value.name = "Percentage")
  
  # plot
  ggplot(data = df.m,
         aes(x = Group, y = Percentage, group = Demographics, colour = Demographics)) + 
    geom_polygon(size = 1, alpha= 0.2) + 
    ylim(-2.0, 2.0) + ggtitle("Radar")  + 
    scale_x_discrete() +
    theme_light() +
    scale_color_manual(values = c("Red", "Blue","Black")) +
    scale_fill_manual(values = c("Red", "Blue","Black")) +
    coord_polar()
  </code></pre>