Math::Combinatorics で 階乗、組み合わせ、順列を算出 - end0tknr's kipple - web写経開発

Math::Combinatorics で 階乗、組み合わせ、順列を算出 - end0tknr's kipple - web写経開発

http://search.cpan.org/perldoc?Math::Combinatorics 書こうと思えば、書けますが、こういうmoduleがあ...概要を表示 http://search.cpan.org/perldoc?Math::Combinatorics 書こうと思えば、書けますが、こういうmoduleがあると、やはり使ってしまいます。 #!/usr/local/bin/perl use strict; use Math::Combinatorics; use Data::Dumper; main(); sub main { #階乗 my $ret_factorial = factorial(4); # = 4x3x2x1 print "#### FACTORIAL\n"; print "$ret_factorial\n"; #組み合わせ nCr = n! / ((n-r)!r!) my @pre_combine = qw/1 2 3/; my @ret_combine = combine(2,@pre_combine); #C(3,2)

• perl