This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A152870 #12 Nov 10 2024 05:43:44
%S A152870 8,9,10,12,13,19,24,35,42,89,133,474,671,1267,1578,2008,2215,2294,
%T A152870 4168,5558,6572,8566,11235,18742,35839,44264,536490,727739
%N A152870 Indices of primes in the Padovan sequence A000931.
%F A152870 a(n) = A112882(n) + 5. - _Amiram Eldar_, Nov 10 2024
%t A152870 a[0] = 1; a[1] = 0; a[2] = 0;
%t A152870 a[n_] := a[n] = a[n - 2] + a[n - 3];
%t A152870 Flatten[Table[If[PrimeQ[a[n]], n, {}], {n, 0, 10000}]]
%o A152870 (PARI) v=[1,1,1];for(n=8,1e4,v=[v[2],v[3],v[1]+v[2]];if(ispseudoprime(v[3]),print1(n", "))) \\ _Charles R Greathouse IV_, Nov 07 2011
%Y A152870 Cf. A000931, A001605, A100891, A112882.
%K A152870 nonn,more
%O A152870 1,1
%A A152870 _Roger L. Bagula_, Dec 14 2008
%E A152870 a(23)-a(26) from _Charles R Greathouse IV_, Nov 07 2011
%E A152870 a(27)-a(28) calculated from the data at A112882 by _Amiram Eldar_, Nov 10 2024