|
6, 8, 10, 14, 20, 22, 27, 30, 35, 44, 46, 54, 58, 62, 66, 75, 82, 85, 92, 96, 99, 108, 114, 120, 129, 134, 136, 142, 144, 148, 166, 171, 178, 182, 194, 196, 204, 210, 215, 221, 230, 232, 245, 247, 252, 254, 268, 285, 289, 291, 296, 302, 304, 318, 324, 330, 338
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Composites (A002808) with prime (A000040) subscripts. a(n) U A175251(n) = A002808(n). Subsequence of A022449 (composites (A002808) with noncomposite (A008578) subscripts), a(n) = A022449(n+1). [From Jaroslav Krizek, Mar 14 2010]
|
|
LINKS
|
Table of n, a(n) for n=1..57.
|
|
MATHEMATICA
|
Composite[n_] := FixedPoint[n + PrimePi[#] + 1 & , n + PrimePi[n] + 1];
a[n_] := Composite[Prime[n]];
Array[a, 100] (* Jean-François Alcover, Jan 26 2018, after Robert G. Wilson v *)
|
|
CROSSREFS
|
Cf. A002808, A000040, A065856, A065857.
Sequence in context: A298252 A152126 A315853 * A243537 A073582 A048886
Adjacent sequences: A065855 A065856 A065857 * A065859 A065860 A065861
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos Elemer, Nov 26 2001
|
|
STATUS
|
approved
|
|