I am working on making a Wind Rose figure using the openair
package. How can I increase the legend text font size, legend title font size, and left-align the legend title?
library(openair)
dd <- data.frame(
datetime = seq.POSIXt(as.POSIXct('2022-05-07 00:00:00'),
as.POSIXct('2022-05-07 23:00:00'),
'1 hour'),
windDir_deg = c(290, 272, 290, 272, 298, 295, 298, 289, 314, 337, 335, 320, 331, 351, 359, 7, 289, 341, 348, 279, 354, 278, 156, 173),
windgust_ms = c(3.5, 1.4, 3.4, 2.6, 4.3, 20.4, 13.3, 12.5, 17.6, 2.9, 18.0, 5.2, 6.9, 7.3, 7.1, 7.0, 5.6, 5.9, 5.7, 5.1, 5.0, 2.7, 4.5, 4.2)
)
windRose(dd, ws = 'windgust_ms', wd = 'windDir_deg',
breaks = c(0,1,2,3,5,8,11,14,17,21),
cols = c('gray95','#ffffcc','#ffeda0','#fed976','#feb24c',
'#fd8d3c','#fc4e2a','#e31a1c','#b10026'),
annotate = F,
paddle = F,
key.position = 'right',
key.header = expression(Wind~Speed~(m~s^-1)),
key.footer = NULL)
Created on 2023-08-15 with reprex v2.0.2
UPDATE: I was able to increase the font size of the legend text and title using fontsize =
but still working on left-aligning the legend title.
windRose(dd, ws = 'windgust_ms', wd = 'windDir_deg',
breaks = c(0,1,2,3,5,8,11,14,17,21),
cols = c('gray95','#ffffcc','#ffeda0','#fed976','#feb24c',
'#fd8d3c','#fc4e2a','#e31a1c','#b10026'),
annotate = F,
paddle = F,
key.position = 'right',
key.header = expression(Wind~Speed~(m~s^-1)),
key.footer = NULL,
fontsize = 15)