login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A152870 Indices of primes in the Padovan sequence A000931. 0
8, 9, 10, 12, 13, 19, 24, 35, 42, 89, 133, 474, 671, 1267, 1578, 2008, 2215, 2294, 4168, 5558, 6572, 8566, 11235, 18742, 35839, 44264 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..26.

MATHEMATICA

Clear[a, n]; a[0] = 1; a[1] = 0; a[2] = 0;

a[n_] := a[n] = a[n - 2] + a[n - 3];

Flatten[Table[If[PrimeQ[a[n]], n, {}], {n, 0, 10000}]]

PROG

(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

CROSSREFS

Cf. A000931, A001605.

Sequence in context: A138581 A323062 A097363 * A181723 A078893 A050704

Adjacent sequences:  A152867 A152868 A152869 * A152871 A152872 A152873

KEYWORD

nonn

AUTHOR

Roger L. Bagula, Dec 14 2008

EXTENSIONS

a(23)-a(26) from Charles R Greathouse IV, Nov 07 2011

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 15 14:04 EDT 2019. Contains 327078 sequences. (Running on oeis4.)