A136365 Numbers k such that A075986(k) is prime.

1, 171, 210, 550, 1445, 1809, 2176, 2719

Offset: 1

Author

Alexander Adamchuk, Dec 27 2007

Keywords

• nonn
• hard
• more

Crossrefs

Cf. A075986 (numerator of 1 + 1/p(1)^2 + ... + 1/p(n)^2, where p(k) = prime(k)).

Cf. A024528, A125707.

Cf. A136366, A136367, A136368, A136369, A136370, A136371.

Programs

Mathematica

f=1; Do[ p=Prime[n]; f=f + 1/p^2; g=Numerator[ f ]; If[ PrimeQ[ g ], Print[ {n, g} ] ], {n, 1, 210} ]

Extensions

a(4)-a(8) from Robert Price, Aug 26 2019