cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A238336 The first row of Pascal's triangle having exactly n distinct squarefree numbers, or -1 if no such row exists.

This page as a plain text file.
%I A238336 #14 Mar 08 2014 02:26:14
%S A238336 0,2,5,7,13,11,15,44,53,46,59,23,43,278,191,143,79,119,187,62,47,221,
%T A238336 214,1643,159,238,95,473,314,3583,671,474,958,3071,5719,215,1439,7423,
%U A238336 1663,447,223,3695,4346,4318,12983,319,35069,5983,5471,8567,959,3067
%N A238336 The first row of Pascal's triangle having exactly n distinct squarefree numbers, or -1 if no such row exists.
%H A238336 A. Granville and O. Ramaré, <a href="http://www.dms.umontreal.ca/~andrew/PDF/ramare.pdf">Explicit bounds on exponential sums and the scarcity of squarefree binomial coefficients</a>, Mathematika 43 (1996), 73-107, <a href="http://dx.doi.org/10.1112/S0025579300011608">[DOI]</a>.
%t A238336 nn = 20; t = Table[-1, {nn}]; found = 0; n = -1; While[found < nn, n++; len = Length[Select[Binomial[n, Range[0, n/2]], SquareFreeQ[#] &]]; If[0 < len <= nn && t[[len]] == -1, t[[len]] = n; found++]]; t
%Y A238336 Cf. A064461, A238337.
%K A238336 nonn,more,hard
%O A238336 1,2
%A A238336 _T. D. Noe_, Mar 05 2014
%E A238336 Extended by _T. D. Noe_, Mar 07 2014