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.

A065348 Positions of zeros in A065345.

This page as a plain text file.
%I A065348 #19 Dec 12 2024 14:53:26
%S A065348 8,11,16,18,19,20,23,26,35,38,41,42,43,44,46,48,49,50,51,53,54,55,56,
%T A065348 58,59,60,64,66,67,68,70,71,72,73,74,75,76,80,83,86,89,92,95,96,97,98,
%U A065348 99,100,101,102,103,104,107,110,113,116,119,123,124,128,130,131,134
%N A065348 Positions of zeros in A065345.
%H A065348 Harry J. Smith, <a href="/A065348/b065348.txt">Table of n, a(n) for n = 1..1000</a>
%H A065348 Carl Pomerance, <a href="https://math.dartmouth.edu/~carlp/catalan5.pdf">Divisors of the middle binomial coefficient</a>, Amer. Math. Monthly, 112 (2015), 636-644.
%t A065348 ris = {}; Do[If[Mod[Binomial[2 n, n], (n + 1) (n + 2) (n + 3)] == 0,
%t A065348 AppendTo[ris, n]], {n, 150}]; ris (* _Bruno Berselli_, Jan 06 2014 *)
%o A065348 (PARI) isok(k) = { binomial(2*k, k) % ((k + 1)*(k + 2)*(k + 3)) == 0 } \\ _Harry J. Smith_, Oct 17 2009
%Y A065348 Cf. A000108, A065344, A065345, A065346, A065347, A065349.
%K A065348 nonn
%O A065348 1,1
%A A065348 _Labos Elemer_, Oct 30 2001