|
|
A141208
|
|
a(n) = prime(prime(prime(n) - 1) - 1) - 1, where prime(n) = n-th prime.
|
|
2
|
|
|
1, 2, 12, 36, 106, 150, 238, 280, 396, 576, 612, 862, 1020, 1068, 1212, 1492, 1732, 1810, 2088, 2346, 2410, 2712, 2902, 3220, 3582, 3906, 4020, 4210, 4336, 4512, 5278, 5530, 5848, 6028, 6636, 6688, 7102, 7516, 7740, 8110, 8500, 8572, 9282, 9396, 9648
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Table of n, a(n) for n=1..45.
|
|
MAPLE
|
p:=ithprime: seq(p(p(p(n)-1)-1)-1, n=1..53); # Juri-Stepan Gerasimov, Oct 25 2009
|
|
MATHEMATICA
|
Table[Prime[Prime[Prime[n - 1] - 1] - 1] - 1, {n, 2, 50}] (* Vincenzo Librandi, Apr 05 2015 *)
|
|
PROG
|
(Magma) [NthPrime(NthPrime(NthPrime(n)-1)-1)-1: n in [1..50]]; // Vincenzo Librandi, Apr 05 2015
|
|
CROSSREFS
|
Cf. A141139, A141185. - Juri-Stepan Gerasimov, Oct 25 2009
Cf. A140853.
Sequence in context: A011379 A338610 A073404 * A181825 A169630 A192385
Adjacent sequences: A141205 A141206 A141207 * A141209 A141210 A141211
|
|
KEYWORD
|
nonn,changed
|
|
AUTHOR
|
Juri-Stepan Gerasimov, Jul 31 2008
|
|
EXTENSIONS
|
a(22) corrected by D. S. McNeil, Mar 21 2009
|
|
STATUS
|
approved
|
|
|
|