r - Visnetwork プロットが png 画像として保存されない

Question

を使用して単純なネットワークをプロットしますvisNetworkが、保存しようとするとpng結果として空の画像が得られます。

png("ex.png")
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, width = "100%")
dev.off()