login
A091158
Indices of terms in the sequence 3, 1, 4, 5, 9, 14, 23, ... (A000285 prefixed with 3) which are prime numbers.
1
1, 4, 7, 8, 10, 11, 16, 20, 23, 26, 28, 35, 40, 56, 58, 80, 83, 92, 98, 100, 307, 416, 575, 691, 746, 818, 820, 971, 1391, 1487, 2000, 2200, 2368, 2386, 3043, 4076, 4868, 6536, 6776, 6787, 8008, 11915, 18898
OFFSET
1,2
MATHEMATICA
Join[{1}, Flatten[Position[LinearRecurrence[{1, 1}, {1, 4}, 19000], _?PrimeQ]] +1] (* Harvey P. Dale, Nov 17 2013 *)
CROSSREFS
Sequence in context: A026316 A283767 A174142 * A175553 A284684 A175008
KEYWORD
nonn
AUTHOR
G. L. Honaker, Jr., Dec 23 2003
EXTENSIONS
More terms from Ray Chandler, Jan 04 2004
STATUS
approved