1

我在 R (3.2.1) 的 openair 包中使用 windRose,使用 R studio。

library(openair)
mydata = read.csv("sample.csv")
windRose(mydata)

我是否使用自己的数据(sample.csv):

date,ws,wd
14/10/2014 09:00,1.4,357
14/10/2014 10:00,1.5,49
14/10/2014 11:00,0.1,274
14/10/2014 12:00,0.3,77
14/10/2014 13:00,1,38
14/10/2014 14:00,1,351
14/10/2014 15:00,1,59
14/10/2014 16:00,1.4,23
14/10/2014 17:00,1,47
14/10/2014 18:00,0.9,3
14/10/2014 19:00,1.3,3
14/10/2014 20:00,2.3,146
14/10/2014 21:00,2.5,151
14/10/2014 22:00,1.5,176
14/10/2014 23:00,2.7,163
15/10/2014 00:00,2.4,174
15/10/2014 01:00,2.5,157
15/10/2014 02:00,2.8,152
15/10/2014 03:00,4.7,155
15/10/2014 04:00,3.4,164
15/10/2014 05:00,3.4,158
15/10/2014 06:00,3.9,153
15/10/2014 07:00,3.6,148
15/10/2014 08:00,3.2,147
15/10/2014 09:00,3.2,141
15/10/2014 10:00,3.7,136
15/10/2014 11:00,2.9,130
15/10/2014 12:00,3.6,123

或来自 openair 网站的示例数据,我得到同样的错误:

Error in Summary.factor(1:28, na.rm = FALSE) : 
‘min’ not meaningful for factors

我已经卸载并重新安装了软件包:openair、png、dplyr、maps、lazyeval,例如:

remove.packages("dplyr")
install.packages("dplyr", dependencies = TRUE)

我已将“sample.csv”中的日期格式从 YYYY/MM/DD 更改为如图所示,我已填写“sample.csv”中所有缺失的条目我已确保没有零

这是我尝试使用 openair 的第一件事

我不知道还有什么可以在这里尝试的。你能帮我吗?谢谢!

4

2 回答 2

1

使用参数colClassesinread.csv将第一列变成Date类:

library(openair)

mydata = read.csv("sample.csv", colClasses = c("Date", "numeric", "integer"))

windRose(mydata)
于 2015-08-11T01:44:15.380 回答
1

谢谢洪欧,

我用了:

mydata$date <- as.POSIXct((strptime(mydata$date,format = "%d/%m/%Y %H:%M")))

现在它可以工作了!

于 2015-08-11T01:40:25.337 回答