login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A081384 C(p[n],n) is divisible by n^2. 0
1, 60, 624, 663, 1309, 1638, 1950, 2145, 2394, 2470, 2508, 3640, 4186, 5016, 5187, 5928, 6138, 6417, 6479, 7395, 7800, 7920, 7956, 8372, 8415, 8580, 8645, 9350, 10340, 10582, 11220, 11466, 11484, 12540, 12825, 12920, 13325, 13680, 13833, 14620, 14911, 15708 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Table of n, a(n) for n=1..42.

MATHEMATICA

Do[s=Binomial[Prime[n], n]; If[IntegerQ[s/n^2], Print[n]], {n, 1, 10000}]

Select[Range[10000], Divisible[Binomial[Prime[#], #], #^2]&] (* Harvey P. Dale, Mar 10 2013 *)

CROSSREFS

Sequence in context: A101384 A229750 A223338 * A283786 A099344 A324068

Adjacent sequences:  A081381 A081382 A081383 * A081385 A081386 A081387

KEYWORD

nonn

AUTHOR

Labos Elemer, Mar 26 2003

EXTENSIONS

More terms from Harvey P. Dale, Mar 10 2013

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 23 09:03 EDT 2020. Contains 337298 sequences. (Running on oeis4.)