[英]dynamically add events to dygraph r
我有一個數據框,其中包含來自時間序列的離群值的選定日期。 我想將它們作為事件行動態添加到我的圖表中。 我的數據看起來像這樣
> head(data)
Group Date
1 g1 2013-08-26
2 g1 2013-08-27
3 g2 2013-08-29
4 g2 2013-12-31
5 g3 2014-01-08
df_sub <- data[data$Group=='g1',]
我正在嘗試創建一個接受組名的函數,並創建一個帶有異常值作為事件行的圖表。
在我的例子中 對於g1,存在兩個帶有異常值的日期。
由於基本功能如下所示:
p <- dygraph(df_sub) %>% dyEvent(date = '2013-08-26', label='xyz', labelLoc='bottom')
我想動態地傳遞兩個日期並獲得兩個事件行。 由於dyEvent僅需要一個日期,是否可以針對多個日期執行此操作?
謝謝
我發現可以像這樣構建筆畫圖:
p <- dygraph(df_sub)
p <- p %>% dyEvent(date = '2013-08-26', label='xyz', labelLoc='bottom')
然后調用p調用圖。 因此,您可以使用for循環創建更多事件行:
p <- dygraph(df_sub)
for (i in 1:dim(df_sub)[1]){
p <- p %>% dyEvent(date = df_sub$Date[i], label='xyz', labelLoc='bottom')
}
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.