如何在timevis中构建嵌套的组对象

Question

我正在尝试在timevis中使用嵌套组，这显然是受支持的。但是，没有示例，我很难创建带有嵌套组的timevis对象。

嵌套的组是在groups对象中定义的，但是尚不清楚如何添加这些组，因为timevis需要将组作为data.frame。

library(timevis)
timevis(data = data.frame(
  start = c(Sys.Date(), Sys.Date(), Sys.Date() + 1, Sys.Date() + 2),
  content = c("one", "two", "three", "four"),
  group = c(1, 2, 3, 4)
  ),
  groups = data.frame(id = 1:4, content = c("G1", "G2","G3","G4"))
)

我希望G3和G4是G1的嵌套组。但是，我不确定如何构建groups对象来定义nestedGroups。