具有 amXYChart() 函数的同一图的多行

Question

我是第一次尝试使用 amXYChart() 函数，我想在同一个图上表示两条线，但我没能做到。

例如那个数据集。我可以用下面的代码表示一行。

x <- data.frame("value" = 1:5, "cats" = c(10,20,30,40,50), "dogs" = c(15,25,35,36,48))
amXYChart(x="value", y="dogs", dataProvider=x, keepNA = TRUE) %>%
  addGraph(xField = "value", yField = "dogs")

然而，当我尝试表示这两条线时，我的绘图 window 是空的（仅显示 x 轴）。

x <- data.frame("value" = 1:5, "cats" = c(10,20,30,40,50), "dogs" = c(15,25,35,36,48))
amXYChart(x="value", y=c("cats","dogs"), dataProvider=x, keepNA = TRUE) %>%
  addGraph(xField = "value", yField = c("cats","dogs"))

另外，由于交互性，我正在尝试使用此包，但是当我放置我的情节光标（第一个）时，什么也没有出现。通过下面的示例，它可以完美运行。

library(lubridate)
data("data_stock_2")
amTimeSeries(data_stock_2, 'date', c('ts1', 'ts2'))

交互性只针对时间序列数据吗？

非常感谢您的帮助！

Answer 1

我建议使用amSerialChart如下：

amSerialChart(dataProvider=dts, keepNA = TRUE, categoryField="value") %>%
  addGraph(valueField = "cats") %>%
  addGraph(valueField = "dogs") %>%
  setChartCursor()

或

vars <- c("cats", "dogs")
p <- amSerialChart(dataProvider=dts, keepNA = TRUE, categoryField="value") 
for (vark in vars) {
  p <- p %>% addGraph(valueField = vark)
}
p %>% setChartCursor()

具有 amXYChart() 函数的同一图的多行

Multiple lines of the same plot with amXYChart() function

r

amcharts