построение сетевого графика с обновление программы создания

Я хотел бы создать этот простой сюжет графика:

library(igraph)mydata <- data.table(from=c("John", "John", "Jim"),to=c("John", "Jim", "Jack"))mygraph <- graph_from_data_frame(d=mydata, directed=T)plot(mygraph, vertex.label.dist=2)
enter image description here

С обновление программы создания

library(DiagrammeR)mygraph2 <- from_igraph(mygraph)grViz(mygraph2)

Производит эта ошибка

Error in file.exists(diagram) : invalid 'file' argument

Я также попытался с

grViz(readLines(mygraph2)) 

и другие комбинации или команда plot (), но я не могу найти правильный путь.

Как я могу сделать это?

Я openen новый вопрос, чтобы получить тот же результат непосредственно с обновление программы создания, без графика:

How to create a network graph with DiagrammeR?