仏教の根本思想を278文字でまとめている般若心経をさらに簡潔にし、直感的に理解するため、統計解析ソフトRを使い Word Cloud を描いてみました。出現頻度が高い単語ほど大きなフォントサイズで表現されるため、重要な言葉ほど沢山使われているとすれば、重要な概念が大きく現れるはずです。
必要なRパッケージ wordcloud (Fellows, 2014) を読み込みます
library(wordcloud, quietly = TRUE)
佛 說 摩 訶 般 若 波 羅 蜜 多 心 經 觀 自 在 菩 薩 行 深 般 若 波 羅 蜜 多 時 照 見 五 蘊 皆 空 度 一 切 苦 厄 舍 利 子 色 不 異 空 空 不 異 色 色 卽 是 空 空 卽 是 色 受 想 行 識 亦 復 如 是 舍 利 子 是 諸 法 空 相 不 生 不 滅 不 垢 不 淨 不 增 不 減 是 故 空 中 無 色 無 受 想 行 識 無 眼 耳 鼻 舌 身 意 無 色 聲 香 味 觸 法 無 眼 界 乃 至 無 意 識 界 無 無 明 亦 無 無 明 盡 乃 至 無 老 死 亦 無 老 死 盡 無 苦 集 滅 道 無 智 亦 無 得 以 無 所 得 故 菩 提 薩 埵 依 般 若 波 羅 蜜 多 故 心 無 罣 礙 無 罣 礙 故 無 有 恐 怖 遠 離 一 切 顚 倒 夢 想 究 竟 涅 槃 三 世 諸 佛 依 般 若 波 羅 蜜 多 故 得 阿 耨 多 羅 三 藐 三 菩 提 故 知 般 若 波 羅 蜜 多 是 大 神 呪 是 大 明 呪 是 無 上 呪 是 無 等 等 呪 能 除 一 切 苦 眞 實 不 虚 故 說 般 若 波 羅 蜜 多 呪 卽 說 呪 曰 揭 諦 揭 諦 波 羅 揭 諦 波 羅 僧 揭 諦 菩 提 薩 婆 訶 般 若 心 經
般若心経を縦一列にまとめたテキストファイルを読み込みます
hs = read.table(file="HannyaShingyo.txt", header=T, as.is =T)
hs$Count = 1
head(hs)
## Order Word Count
## 1 1 佛 1
## 2 2 說 1
## 3 3 摩 1
## 4 4 訶 1
## 5 5 般 1
## 6 6 若 1
テキスト内の漢字の頻度を計算します
frequency = aggregate(hs$Count, list(hs$Word), sum)
colnames(frequency) <- c("Word", "Frequency")
head(frequency)
## Word Frequency
## 1 一 3
## 2 三 3
## 3 上 1
## 4 不 9
## 5 世 1
## 6 中 1
Word cloud を描きます
par(family = "HiraKakuProN-W3")
wordcloud(frequency$Word, frequency$Frequency, min.freq = 1,color = c("gray50", "gray30", "gray0"), rot.per=0, random.order=F)
「無」という言葉が一番頻繁に使われているという興味深い結果になりました。「幸せになるためには、あれもこれも手にいれなくてはいけない」とプレッシャーを与え「有」を尊ぶ現代社会の価値観とは異なります。
References
Fellows, I. (2014). wordcloud: Word Clouds. R package version 2.5. http://CRAN.R-project.org/package=wordcloud