如何在RStudio中创建一个巨大的树图？

Question

我是新来R.

我想创建一个巨大的树形图表示R中，看起来像树形图1在这张图片中一个乐透游戏（我通过PowerPoint中使得它）：

问题是我需要从45个球中抽出6个球。在这种情况下的完全元素将是127.我试图用PowerPoint创建一个树图，它看起来像树图2.

然后我放弃了。我无法输入“匹配”和“不匹配”，然后手动计算这种大规模图表的概率。

如何创建树状图2，树状图1中具有类似标签的树状图？

Answer 1

的DiagrammeR package应该是有帮助的：

library(DiagrammeR) 

nodes <- create_nodes(nodes = 1:7, type = "number") 

edges <- create_edges(from = c(1, 1, 2, 2, 3, 3), 
         to = c(2, 3, 4, 5, 6, 7), 
         rel = "leading to") 

graph <- create_graph(nodes_df = nodes, 
         edges_df = edges, 
         graph_attrs = "layout = dot", 
         node_attrs = "fontname = Helvetica", 
         edge_attrs = "color = gray20") 

# View the graph 
render_graph(graph) 

你可以得到 “神奇” 的编程和标签相应：

nodes <- create_nodes(nodes = 1:7, type = "number", 
         label = c("Lotto", rep(c("match", "no match"), times = 3))) 

### Same Code as Above...