login
A102131
Iccanobirt prime indices (1 of 15): Indices of prime numbers in A102111.
16
4, 6, 7, 19, 30, 175, 265, 591, 1124, 1369, 4359, 10935, 20422, 20559, 26993
OFFSET
1,1
COMMENTS
No more terms through 8000.
a(16) > 50000. - Robert Price, Nov 07 2018
FORMULA
A102111(a(n)) = A102151(n).
MATHEMATICA
a[n_] := a[n] = a[n - 1] + a[n - 2] + IntegerReverse[a[n - 3]];
a[0] = 0; a[1] = 0; a[2] = 1;
Select[Range[0, 5000], PrimeQ[a[#]] &] (* Robert Price, Apr 10 2020 *)
CROSSREFS
KEYWORD
nonn,more,base
AUTHOR
EXTENSIONS
a(12)-a(15) from Robert Price, Nov 07 2018
STATUS
approved