エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
【Perl】第1キーに対する第2キーの頻度分布を出す【ワンライナー】
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
【Perl】第1キーに対する第2キーの頻度分布を出す【ワンライナー】
【Perl】第1キーに対する第2キーの頻度分布を出す【ワンライナー】 2015-09-01-2 [Programming][NLP][Pe... 【Perl】第1キーに対する第2キーの頻度分布を出す【ワンライナー】 2015-09-01-2 [Programming][NLP][Perl] よくやる作業についてメモ。 単語等の分布をざっくり見るときなど。 cat sample.txt (TSV) 旅行 男 ゲーム 男 ゲーム 女 旅行 男 ゴルフ 男 山登り 男 手芸 女 ゴルフ 男 アロマ 女 旅行 女 ライブ 女 perl -F"\t" -anle ' $h{$F[0]}{$F[1]}++; $s{$F[0]}++; END{ for$i(sort{$s{$b}<=>$s{$a}}keys%h){$r=$h{$i}; print join("\t",$i,$s{$i},map{"$_:$$r{$_}"} sort{$$r{$b}<=>$$r{$a}||$a cmp $b}keys%$r)} } ' sample.txt 旅行 3