легко печатать красиво выглядящее дерево диаграммы из данных в R

Question

У меня есть набор данных, как следующее (это будет произвольной длины, но с одной счета колонки в конце):

dd <- data.frame(
    "level1" = c("a", "a", "b"), 
    "level2" = c("c", "d", "c"), 
    "cnt" = c(1, 3, 5) 
) 

и я как распечатать красиво выглядящее дерево этой структуры, без тонны работы :). Уже попытался просто сделать вид и посмотреть на граничные условия для вывода данных.

В идеале структура дерева будет выглядеть следующим образом из приведенных выше данных:

level1  level2 
a: 4 ---> c: 1 
     ---> d: 3 
b: 5 ---> c: 5 

Если последний вектор dataframe получает суммировал различающиеся ветви дерева, но с хорошими диаграммами для визуализации. Последний вектор, потому что мы можем иметь произвольное количество уровней. Кто-нибудь знает легкий путь вперед для этого, не выписывая собственный набор алгоритмов дерева?

Изображение графа:

Answer 1

Использование igraph пакета, например, вы можете получить с небольшой работой. Я исправил некоторые опечатки в ваших данных и добавил новый край, чтобы получить более красивый график. Мой график похож на этот:

А вот мой R код:

actors <- data.frame(name=c('a','b','c','d')) 
relations <- data.frame(from=c("a", "a", "b",'c'), 
         to=c("c", "b", "c",'d'), 
         weight=c(1, 3, 5,4)) 
g <- graph.data.frame(relations, directed=TRUE, 
         vertices=actors) 

E(g)$label=E(g)$weight 
E(g)$label.cex=3 
plot(g,edge.width=E(g)$weight,layout=layout.fruchterman.reingold)