R包windRose固定图比例

谢谢你的帮助

我正在为R使用openair软件包的功能

windRose

。我正在为多个站点的wind date制作wind Rose，我需要将所有Rose的结果一起进行比较。问题在于

windRose

功能将windRose的最大半径固定为略大于任何方向上的最大计数百分比。我如何控制windrose的最大比例，比如说将最大打印半径的固定最大值设置为30%，而不是函数设置的默认最大值，这取决于我的数据？

---

我已经研究了函数的代码，但我无法在

windRose

函数代码中找到可以进行此更改的位置。

不完全是您问题的答案，但是

My

ggplot2

windrose代码，其中

rose

是一个data.frame，其中列为

风速

和

风向

，单位为度：

rose <- data.frame(wind_speed=sample(1:25, 1e5, replace=TRUE), 
                   wind_direction=sample(1:360, 1e5, replace=TRUE))

ggplot(rose, 
       aes(x=wind_direction,
           fill=cut(wind_speed, seq(0, 30, 5)))) +
    geom_bar() +
    scale_x_continuous(limits=c(0,360),
                       breaks=c(0, 90, 180, 270)) +
    coord_polar() +
    labs(fill='Wind Speed (m/s)') +
    opts(axis.text.y=theme_blank(),
         axis.ticks=theme_blank(),
         axis.title.y=theme_blank(),
         axis.title.x=theme_blank())

---

rose不完全是对你问题的回答，但是

My
ggplot2
windrose代码，其中
rose
是一个data.frame，其中列为
风速
和
风向
，单位为度：

rose <- data.frame(wind_speed=sample(1:25, 1e5, replace=TRUE), 
                   wind_direction=sample(1:360, 1e5, replace=TRUE))

ggplot(rose, 
       aes(x=wind_direction,
           fill=cut(wind_speed, seq(0, 30, 5)))) +
    geom_bar() +
    scale_x_continuous(limits=c(0,360),
                       breaks=c(0, 90, 180, 270)) +
    coord_polar() +
    labs(fill='Wind Speed (m/s)') +
    opts(axis.text.y=theme_blank(),
         axis.ticks=theme_blank(),
         axis.title.y=theme_blank(),
         axis.title.x=theme_blank())

rose我编了一些有用的代码。您可以根据需要设置轴限制。
我编写了一些有用的代码。您可以根据需要设置轴限制。
欢迎使用SO！如果您能提供一个帮助并向我们展示您尝试过的代码，您将更有可能获得帮助。欢迎使用SO！如果您能提供一个帮助并向我们展示您尝试过的代码，您将更有可能获得帮助。