Shlomi Fish avatar Shlomi Fish committed 6487bef

More.

Comments (0)

Files changed (3)

project-euler/148/148-analysis.txt

     + Int[ (k + (7**2-1) - n%(7**2)) / 7**2]
     + Int[ (k + (7**3-1) - n%(7**3)) / 7**3]
 
+For
+
+

project-euler/148/calc-num-Y-in-row.pl

+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Math::BigInt lib => 'GMP', ':constant';
+
+sub fact
+{
+    return shift->copy->bfac;
+}
+
+sub nCr
+{
+    my ($n, $k) = @_;
+    $n += 0;
+    $k += 0;
+    return fact($n) / (fact($n-$k) * fact($k));
+}
+
+my $n = shift(@ARGV);
+
+print join(' ', map { +(nCr($n+1, $_) % 7 == 0 ) ? 'Y' : 'N' } (1 .. $n)), "\n";

project-euler/148/print-row.pl

+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Math::BigInt lib => 'GMP', ':constant';
+
+sub fact
+{
+    return shift->copy->bfac;
+}
+
+sub nCr
+{
+    my ($n, $k) = @_;
+    $n += 0;
+    $k += 0;
+    return fact($n) / (fact($n-$k) * fact($k));
+}
+
+my $n = shift(@ARGV);
+
+print join(' ', map { +(nCr($n, $_) % 7 == 0 ) ? 'Y' : 'N' } (1 .. $n-1)), "\n";
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.