R语言 风玫瑰图各月的变化情况: Package 露天

hiz5n14c  于 2022-12-20  发布在  其他
关注(0)|答案(1)|浏览(272)

我已经约会了8年。我的数据样本:

structure(list(Data = c("1/1/2015", "1/2/2015", "1/3/2015", "1/4/2015", 
"1/5/2015", "1/6/2015", "1/7/2015", "1/8/2015", "1/9/2015", "1/10/2015", 
"1/11/2015", "1/12/2015", "1/13/2015", "1/14/2015", "1/15/2015", 
"1/16/2015", "1/17/2015", "1/18/2015", "1/19/2015", "1/20/2015", 
"1/21/2015", "1/22/2015", "1/23/2015", "1/24/2015", "1/25/2015", 
"1/26/2015", "1/27/2015", "1/28/2015", "1/29/2015", "1/30/2015", 
"1/31/2015"), no2 = c(3.56, 11.13, 11.84, 4.88, 6.16, 12.56, 
18.99, 24.74, 10.81, 12.7, 6.08, 7.34, 16.88, 16.65, 15.81, 20.78, 
15.03, 11.82, 15.18, 17, 15.21, 13.86, 10.28, 8.34, 11.89, 7.22, 
15.44, 10.55, 8.19, 5.04, 14.65), ws = c(10.84, 3.71, 2.08, 4.59, 
6.18, 2.97, 2.13, 1.22, 1.92, 2.07, 3.09, 4.75, 2.12, 1.8, 1.9, 
1.79, 1.58, 1.86, 1.58, 1.47, 1.7, 2.6, 2.67, 3.21, 1.78, 4.58, 
1.79, 3.1, 3.49, 6.15, 2.59), wd = c(90, 112.5, 112.5, 270, 90, 
135, 112.5, 112.5, 270, 315, 270, 112.5, 112.5, 135, 135, 112.5, 
292.5, 135, 270, 135, 112.5, 112.5, 270, 112.5, 112.5, 112.5, 
112.5, 112.5, 270, 270, 270)), class = "data.frame", row.names = c(NA, 
-31L))
library(openair)

windRose(nitrogen,
         key = list(header="Wind Rose Acri", footer="wind speed",
                    plot.style = c("ticks", "border"),
                    fit = "all", height = 1,
                    space = "top"))

pollutionRose(nitrogen, pollutant = "no2")

我想展示风玫瑰是如何随月份变化的。同样的问题(Wind rose with ggplot (R)?),但尝试通过Openair包中的函数实现。

ctehm74n

ctehm74n1#

您可以将数据列转换为一个名为date的日期格式的名称,并指定type参数为“month”。type根据documenation
type确定如何拆分数据,即调节数据,然后绘制数据。默认值为将使用整个数据生成单个图。类型可以是cutData中详细说明的内置类型之一,例如“季节”、“年”、“工作日”等。例如,type =“季节”将生成四个图---每个季节一个。
也可以选择类型作为数据框中的另一个变量。如果该变量是数值变量,则数据将被拆分为四个分位数(如果可能)并相应地进行标记。如果类型是现有的字符或因子变量,则将直接使用这些类别/水平。这为理解不同变量的变化以及它们如何相互依赖提供了极大的灵活性。
类型可以是最大长度2,例如,type = c(“季节”,“工作日”)将生成一个按季节和星期几划分的2x2图。注意,当提供两种类型时,第一种类型形成列,第二种类型形成行。
请注意,您只提供了一个月:

library(openair)
# add month column
nitrogen$date <- as.POSIXct(nitrogen$Data, format = '%m/%d/%Y')
windRose(nitrogen,
         key = list(header="Wind Rose Acri", footer="wind speed",
                    plot.style = c("ticks", "border"),
                    fit = "all", height = 1,
                    space = "top"),
         type = 'month')

创建于2022年12月13日,使用reprex v2.0.2
下面是一个内置数据为type = 'month'的示例:

library(openair)
windRose(mydata, type = "month")

创建于2022年12月13日,使用reprex v2.0.2

相关问题