Pixivのタグから、自分の性癖をマイニングする方法
正確にいうと
「FirefoxとANK Pixiv Toolを使ってローカルに保存した Pixiv の絵に対して付けられていた『タグ』から自分の性癖をマイニングする方法」なのですー。
Firefoxとか使ってない方、さようなら。
まず、
Firefox の Profile なディレクトリ(http://support.mozilla.com/ja/kb/%E3%83%97%E3%83%AD%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB とか参照)に移動して下さいー。 んで、カレントディレクトリに ankpixiv.sqlite があることを確認して下さいー。
無い? ということは、ANK Pixiv Toolを使ってない方なのですね、さようなら。
あったら、
そのディレクトリで以下のPerlスクリプトをおもむろに実行してください。同じのを、http://gist.github.com/232151 にも置いときました!
anktagcloud.pl
#!/usr/bin/perl use strict; use warnings; use DBI; use feature ":5.10"; my $dbh = DBI->connect("dbi:SQLite:dbname=ankpixiv.sqlite", undef, undef, { AutoCommit => 0, RaiseError => 1, }); my %count; eval { my $ary_ref = $dbh->selectall_arrayref("SELECT tags FROM histories;"); for my $row (@$ary_ref) { for (split ' ', $row->[0]) { $count{$_}++; } } }; if ($@) { $dbh->disconnect; die "Error: $@"; } $dbh->disconnect or warn $!; say "$count{$_}\t$_" for (sort {$count{$b} <=> $count{$a}} keys %count);
やってることは、
「ダウンロードした絵に付いてたタグを数えて、多い順に並べてる」それだけです。でも、これであなたの性癖がかなりわかるハズです! ちなみに実行例は以下のようになります!
% perl anktagcloud.pl | nkf -Ws | head -50 6456 R-18 1605 おっぱい 1385 オリジナル 1025 東方 869 女の子 600 版権 552 極上の乳 466 アイドルマスター 461 巨乳 442 ロリ 384 ストライクウィッチーズ 361 尻神様 321 眼鏡 311 初音ミク 269 ぱんつ 259 水着 245 触手 244 すじ 242 尻 208 落書き 205 撫で回したい尻 201 アナル 192 C75 180 VOCALOID 170 はいてない 162 制服 160 かんなぎ 149 百合 149 アイマス 149 スク水 141 らき☆すた 139 ツインテール 138 パンツじゃないから恥ずかしくないもん! 138 ぶっかけ 137 セーラー服 135 猫耳 134 裸 133 絵チャ 131 パイズリ 121 くぱぁ 119 中出し 118 むちむち 118 なのは 115 シグナム 111 パンツ 110 少女 110 ふたなり 110 ニーソ 107 貧乳 107 爆乳
結論
性癖がよくわかりますね!!