我有一个名为June的数据框,其中一个名为Hour的列包含; 0:00,0:15,0:30,0:45,1:00,1:15,直至23:45,然后重复30天。另一个名为Diff_H1H2的列包含数字数据,如; 0.0017,0.0067,-0.019,-0.24等。
我只是想绘制数据并尝试过。
plot(June$Hour, June$Diff_H1H2)
这是错误信息。
Error in plot.window(...) : need finite 'xlim' values
In addition: Warning messages:
1: In xy.coords(x, y, xlabel, ylabel, log) : NAs introduced by coercion
2: In min(x) : no non-missing arguments to min; returning Inf
3: In max(x) : no non-missing arguments to max; returning -Inf
这些也是课程:
> class(June$Hour)
[1] "character"
> class(June$Diff_H1H2)
[1] "numeric"
答案 0 :(得分:0)
我为你编写了一些虚拟数据:
Hour <- rep(c('0:15', '0:30', '0:45'), 3)
Hour <- as.numeric(gsub(':', '', Hour))
Diff_H1H2 <- runif(9, min = 0, max = 1)
June <- data.frame(Hour, Diff_H1H2)
plot(June$Hour, June$Diff_H1H2, xaxp = c(15, 45, 2))
要将数据转换为日期/时间格式,您可以执行以下操作,而不是关于as.numeric行:
Hour <- paste0("2010-01-01", " ", Hour, ":00")
Hour <- as.POSIXct(Hour)
当使用其他几行代码运行时会生成以下图像: