login
A285216
Indices of primes in A000219.
3
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,1
LINKS
EXAMPLE
11 is in the sequence because A000219(11) = 859 is prime.
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 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Apr 14 2017
STATUS
approved