This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A065349 Positions of zeros in A065346. 9
 19, 41, 42, 43, 49, 50, 53, 54, 55, 58, 67, 71, 74, 75, 95, 97, 98, 99, 102, 103, 123, 135, 138, 139, 145, 149, 153, 154, 155, 159, 163, 165, 166, 167, 168, 169, 170, 173, 174, 175, 178, 179, 180, 183, 184, 185, 191, 193, 194, 195, 197, 198, 199, 200, 201, 202 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Harry J. Smith, Table of n, a(n) for n = 1..1000 C. Pomerance, Divisors of the middle binomial coefficient, Amer. Math. Monthly, 112 (2015), 636-644. MATHEMATICA ris = {}; Do[If[Mod[Binomial[2 n, n], (n + 1) (n + 2) (n + 3) (n + 4)] == 0, AppendTo[ris, n]], {n, 250}]; ris (* Bruno Berselli, Jan 06 2014 *) PROG (PARI) { n=0; for (m=1, 10^9, if (binomial(2*m, m) % ((m + 1)*(m + 2)*(m + 3)*(m + 4)) == 0, write("b065349.txt", n++, " ", m); if (n==1000, return)) ) } \\ Harry J. Smith, Oct 17 2009 CROSSREFS Cf. A000108, A065344, A065345, A065346, A065347, A065348. Sequence in context: A264537 A164078 A128677 * A085778 A090265 A049485 Adjacent sequences:  A065346 A065347 A065348 * A065350 A065351 A065352 KEYWORD nonn AUTHOR Labos Elemer, Oct 30 2001 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.