A299101 Indices of (probable) primes in A030221.
2, 3, 5, 6, 8, 9, 15, 18, 23, 53, 114, 194, 564, 575, 585, 2594, 3143, 4578, 4970, 9261, 11508, 13298, 30018, 54993, 198476
Offset: 1
Links
- Andrew N. W. Hone, et al., On a family of sequences related to Chebyshev polynomials, arXiv:1802.01793 [math.NT], 2018.
Crossrefs
Programs
-
Mathematica
-1 + Position[Nest[Append[#, 5 #[[-1]] - #[[-2]] ] &, {1, 6}, 2600], ?PrimeQ][[All, 1]] (* _Michael De Vlieger, Jul 03 2020 *)
Formula
Extensions
a(24) from Robert Price, Jul 03 2020
Comments