A285216 Indices of primes in A000219.

2, 4, 11, 30, 32, 40, 50, 85, 100, 237, 381, 733, 805, 882, 1015, 1650, 2439, 3163, 3335, 3506, 3675, 4152, 4446, 4576, 5010, 5101, 6045, 6760, 7412, 8178, 8562, 10026, 10527, 10888, 12406, 12693, 13479, 16109, 16978, 17962, 20696, 22483, 25383, 31458, 38956

Offset: 1

Author

Vaclav Kotesovec, Apr 14 2017

Keywords

• nonn

Examples

			11 is in the sequence because A000219(11) = 859 is prime.
		

Links

• Vaclav Kotesovec, Table of n, a(n) for n = 1..82

Crossrefs

Cf. A000219, A035359, A046063.

Programs

Mathematica

A000219 = Cases[Import["https://oeis.org/A000219/b000219.txt", "Table"], {, }][[All, 2]];
Flatten[Position[A000219, ?PrimeQ]] - 1 (* _Jean-François Alcover, Sep 17 2020, as of todate, this only gives 27 terms *)