読書記録ChangeLog / 2004-12-10

■ cl.itemlistからidfを求める

tfidf
http://www.namazu.org/ml/avocado/msg00010.html

use strict;
my @words;#1アイテムを分かち書きしたもの。
my %f;#{単語,出現回数}のハッシュ
my $th = 1;#閾値
my $line_count = 0;#行数
my $ignore = "http://";
while(<STDIN>){
  $line_count = $line_count + 1;
  @words = split (/\s/ , $_);
  shift @words;
  shift @words;
  my %d;#重複カウント防止
  foreach (@words){
    unless($_ =~ /$ignore/){#URLを除く
      $f{$_} = $f{$_} + 1 unless $d{$_};
      $d{$_} = 1;
      #      print "$f{$_} $_\n";
    }
  }
}
foreach (keys %f){
  my $idf = 1 + log($line_count / $f{$_}) / log(2);
  print "$_,$f{$_},$idf\n" if ($f{$_} > $th);
}

kakasi -w < cl.itemlist| perl idf.pl |lv -Os > idf.txt

[ 固定リンク ]

■ ヒゲを生やした人が言語設計すると成功する

http://www.rubyist.net/~matz/20041206.html#p02
ハードの設計は駄目なのね。

[ 固定リンク ]

■ 要求の出し方

http://d.hatena.ne.jp/hyoshiok/20041208

[ 固定リンク ]

■ プログラムの変更要求の出し方

http://on-o.com/page/diary/20041214.html#p01

[ 固定リンク ]

■ Generalized Venn Diagrams

http://www.informatik.uni-ulm.de/ni/mitarbeiter/HKestler/vennm/
via http://km.meme.hokudai.ac.jp/people/buchi/diary/?date=20041206#p02

[ 固定リンク ]