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.
%I A081384 #12 Oct 04 2024 05:43:42
%S A081384 1,60,624,663,1309,1638,1950,2145,2394,2470,2508,3640,4186,5016,5187,
%T A081384 5928,6138,6417,6479,7395,7800,7920,7956,8372,8415,8580,8645,9350,
%U A081384 10340,10582,11220,11466,11484,12540,12825,12920,13325,13680,13833,14620,14911,15708
%N A081384 Numbers k such that binomial(prime(k), k) is divisible by k^2.
%H A081384 Amiram Eldar, <a href="/A081384/b081384.txt">Table of n, a(n) for n = 1..500</a>
%t A081384 Do[s=Binomial[Prime[n], n]; If[IntegerQ[s/n^2], Print[n]], {n, 1, 10000}]
%t A081384 Select[Range[10000],Divisible[Binomial[Prime[#],#],#^2]&] (* _Harvey P. Dale_, Mar 10 2013 *)
%o A081384 (PARI) is(k) = !(binomial(prime(k), k) % k^2); \\ _Amiram Eldar_, Oct 04 2024
%Y A081384 Cf. A060604.
%K A081384 nonn
%O A081384 1,2
%A A081384 _Labos Elemer_, Mar 26 2003
%E A081384 More terms from _Harvey P. Dale_, Mar 10 2013