R collapsibleTree包：如何使用R在可折叠树中的文本中添加新行？

Question

我正在使用软件包＆＃39; collapsibleTree＆＃39;在R中构建一个可折叠的树。 你可以找到我迄今为止所做的一个小例子here。

我想在美元金额和百分比之间插入一个换行符;所以我想要实现的是this。我在这里发现了一篇关于同一问题的帖子： D3.js - How can I add a new line to the text in this Collapsible Tree?。但是，解决方案是用JavaScript编写的，我根本没有编程经验。

我知道在R中您可以使用\n插入换行符，但它似乎不起作用。这是我做的小例子的代码：

library(collapsibleTree)
data <- data.frame(Level1 = rep("Element 1: $10000 \n 100%",2),
                   Level2 = c("Subelement 1a: $6000 \n 60%",
                              "Subelement 1b: $4000 \n 40%"))
collapsibleTree(
  data,
  hierarchy = c("Level1", "Level2"),
  width = 800,
  height = 800,
  fontSize = 16,
  linkLength = 200,
  fill =  "#001a66" 
)

你有解决这个问题的解决方案吗？

非常感谢任何帮助，非常感谢！