login
A175614
a(1)=1, a(2)=5, then a(n)=a(n-2)+4, if n odd else a(n)=prime(primepi(a(n-2)+4)).
0
1, 5, 5, 17, 9, 31, 13, 47, 17, 67, 21, 83, 25, 103, 29, 127, 33, 149, 37, 167, 41, 191, 45, 211, 49, 233, 53, 257, 57, 277, 61, 307, 65, 331, 69, 353, 73, 379, 77, 401, 81, 431, 85, 449, 89, 467, 93, 499, 97, 523, 101, 563, 105, 587, 109, 607, 113, 631, 117, 653, 121
OFFSET
1,2
MATHEMATICA
(*1*)Flatten[Table[{k, Prime[k+2]}, {k, 1, 200, 4}]]
(*2*)s={1}; a=1; Do[AppendTo[s, {Prime[a+2], a=a+4}], {100}]; Flatten[s]
CROSSREFS
Sequence in context: A273482 A273792 A273855 * A214022 A125256 A228564
KEYWORD
nonn
AUTHOR
Zak Seidov, Jul 24 2010
STATUS
approved