2

我想编写一个脚本，使 R 可用于这个特殊的分析主题的“每个人”。是否有可能创建警告？

time,value
2012-01-01,5
2012-01-02,0
2012-01-03,0
2012-01-04,0
2012-01-05,3

例如，如果该值至少是 0 的 3 倍（之后 - 在一段时间内更好 - 3 天），则给出警告 - 并命名日期。如果我结合条件，也许可以创建类似报告的东西。

通常：通过 read.csv 读取 Masurement 数据，然后通过 as.POSIXct - xts/zoo 设置日期。如果值发生变化等，我希望“用户”得到明确的信息；如果它们长时间为 0 等。第二步是发送电子邮件 - 可能稍后在服务器上运行。

附加问题：我现在在 xts 中有一个 df - 是否可以检查该值是否大于阈值？它不起作用，因为它不是原子向量。

谢谢

4

1 回答 1

6

试试这个。

x <- read.table(text = "time,value
2012-01-01,5
2012-01-02,0
2012-01-03,0
2012-01-04,0
2012-01-05,3", header = TRUE, sep = ",")

if(any(rle(x$value)$lengths >= 3)) warning("I noticed some dates have value 0 at least three times.")

Warning message:
I noticed some dates have value 0 at least three times.

我将把它留给你作为paste一个警告信息的训练练习，它也会给你日期。

于 2013-04-29T15:07:45.747 回答