visnetwork中的多行标题

Question

在R中，如何在visNetwork中拥有多行标题？ \n似乎没有一个解决方案：

require(visNetwork, quietly = TRUE) 
# minimal example 
nodes <- data.frame(id = 1:3) 
edges <- data.frame(from = c(1,2), to = c(1,3)) 
visNetwork(nodes, edges, main ="multi \n line \n title") 

Answer 1

作为互动visNetwork使用HTML，而不是标准打印。
使用HTML的新行标签<br>：

visNetwork(nodes, edges, main ="multi<br>line<br>title") 

要对齐左侧，或申请任何其他样式使用main命名列表作为参数：

visNetwork(nodes, edges, main = list(
           text = "multi<br>line \n title", 
           style = "font-family:Comic Sans MS;color:#ff0000; 
              font-size:15px;text-align:left;"))