Tobyにおすすめを紹介。 pythonでかかれてたのでperlで以下どぎゃーん #!/usr/bin/perl -w use warnings; use strict; use Dumpvalue; require 'pearson.pl'; require 'euclid.pl'; my %prefs = ( 'Lisa Rose' => { 'Lady in the Water' => 2.5, 'Snakes on …

#!/usr/bin/perl -w use warnings; use strict; use Dumpvalue; require 'pearson.pl'; my %prefs = ( 'Lisa Rose' => { 'Lady in the Water' => 2.5, 'Snakes on a Plane' => 3.5, 'Just My Luck' => 3.0, 'Superman Returns' => 3.5, 'You, Me and Dupree'…

成績の大盤振る舞いの誤差を考慮してくれる、ピアソン相関係数。 pythonでかかれてたのでperlでｒｙ #!/usr/bin/perl -w use warnings; use strict; use Dumpvalue; my %prefs = ( 'Lisa Rose' => { 'Lady in the Water' => 2.5, 'Snakes on a Plane' => 3.5…

ユークリッド距離でAさんとBさんがどれくらい近いか計算するやつ。 pythonでかかれてたのでperl化してみた。 #!/usr/bin/perl -w use warnings; use strict; use Dumpvalue; my %prefs = ( 'Lisa Rose' => { 'Lady in the Water' => 2.5, 'Snakes on a Plane…