将散点图和折线图与 R 中的 highcharter 相结合

Question

我是 highcharter 套餐的新手。我想在散点图上添加一条线（回归线）。这看起来很简单，但我无法破解它。我可以使用 hchart() 单独制作它们，但它们不会合并。

library(broom)
library(dplyr)
library(highcharter)

lm.model <- augment(lm(mpg ~ wt, data = mtcars))

lm.model %>%
  hchart(type = "scatter", hcaes(x = wt, y = mpg))

lm.model %>%
  hchart(type = "line", hcaes(x = wt, y = .fitted)

我也试过使用 hc_add_series_scatter() 但我没有找到类似的函数。

highchart() %>%
  hc_add_series_scatter(x = lm.model$wt, y = lm.model$mpg)

是否可以合并两种图表类型？

Answer 1

尝试

highchart() %>%
  hc_add_series(lm.model, "scatter", hcaes(wt, mpg)) %>% 
  hc_add_series(lm.model, "line", hcaes(x = wt, y = .fitted))

输出是

将散点图和折线图与 R 中的 highcharter 相结合

Combine scatter and line charts with highcharter in R

r

highcharts

r-highcharter