裏 RjpWiki

Julia ときどき R, Python によるコンピュータプログラム,コンピュータ・サイエンス,統計学

暗号を解けというのだが(何回目かな?)

2015年06月22日 | ブログラミング

原文が英語というが,アルファベット出現頻度を頼りにするにはちょっと無理がある。
どうせ,換字式だろうとたかをくくって,しらみつぶしに検索。

tbireazrag bs gur crbcyr, ol gur crbcyr, sbe gur crbcyr, funyy abg crevfu sebz gur rnegu

======

以下のプログラムで

s = "tbireazrag bs gur crbcyr, ol gur crbcyr, sbe gur crbcyr, funyy abg crevfu sebz gur rnegu"
a = unlist(strsplit(s, ""))
table(a)
for (b in 1:26) {
  x = chartr(paste(letters, collapse=""), paste(letters[c(b:26,1:(b-1))], collapse=""), s)
  cat(letters[b], " ", x, "\n")
}
# tbireazrag bs gur crbcyr, ol gur crbcyr, sbe gur crbcyr, funyy abg crevfu sebz gur rnegu
# government of the people, by the people, for the people, shall not perish from the earth

コメント    この記事についてブログを書く
  • X
  • Facebookでシェアする
  • はてなブックマークに追加する
  • LINEでシェアする
« 本格的なデータ処理の前にす... | トップ | 両端揃え »
最新の画像もっと見る

コメントを投稿

ブログラミング」カテゴリの最新記事