login
A134208
a(n) = A134207(n) + A134207(n-1).
2
5, 8, 12, 20, 30, 36, 42, 64, 108, 140, 176, 216, 286, 364, 390, 432, 510, 558, 760, 1000, 1092, 1188, 1426, 1632, 1650, 1690, 1782, 1848, 2146, 2520, 2790, 2976, 3102, 3366, 3780, 4140, 4292, 4446, 4914, 5360, 5822, 6300, 6450, 6776, 7110, 7360, 7614, 7728
OFFSET
1,1
COMMENTS
a(n) is divisible by n for every n.
MATHEMATICA
a = {2}; For[n = 1, n < 100, n++, i = 1; While[Not[Mod[a[[ -1]] + Prime[PrimePi[a[[ -1]]] + i], n] == 0], i++ ]; AppendTo[a, Prime[PrimePi[ a[[ -1]]] + i]]]; c = {}; For[b = 1, b < Length[a], b++, AppendTo[c, a[[b]] + a[[b + 1]]]]; c (* Stefan Steinerberger, Oct 17 2007 *)
CROSSREFS
Sequence in context: A314418 A322033 A134205 * A285115 A115072 A114644
KEYWORD
nonn
AUTHOR
Leroy Quet, Oct 14 2007
EXTENSIONS
More terms from Stefan Steinerberger, Oct 17 2007
STATUS
approved