とおもってネットワーク解析をしようと思ってグラフを作ったはいいがigraph の扱いを完全に忘れているので保留。 その元号の年数もあるので適当にヒストグラムでも。 n <- read.delim("nengo.txt", stringsAsFactors=FALSE, header=FALSE) library(stringr) …