%I A133489
%S A133489 2,5,11,23,47,95,143,191,383,767,1151,2303,3455,4607,5759,6911,13823,
%T A133489 20735,27647,55295,82943,110591,138239,276479,414719,552959,691199,
%U A133489 1382399,2073599,2764799,3455999,6911999,10367999,13823999,17279999
%N A133489 a(1)=2. For n >= 2, a(n) = a(n-1) + 1 + (the largest prime among the
first n-1 terms of the sequence {a(k)}).
%H A133489 Leroy Quet, <a href="http://www.prism-of-spirals.net/">Home Page</a>
(listed in lieu of email address)
%e A133489 The largest prime among the first 7 terms of the sequence is a(5)=47.
So a(8) = a(7) + 1 + 47 = 143 + 1 + 47 = 191.
%t A133489 a = {2}; Do[AppendTo[a, a[[ -1]] + 1 + Select[a, PrimeQ[ # ] &][[ -1]]],
{40}]; a - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com),
Dec 03 2007
%Y A133489 Sequence in context: A075712 A000100 A083005 this_sequence A060153 A086219
A055010
%Y A133489 Adjacent sequences: A133486 A133487 A133488 this_sequence A133490 A133491
A133492
%K A133489 nonn
%O A133489 1,1
%A A133489 Leroy Quet Nov 30 2007
%E A133489 More terms from Stefan Steinerberger (stefan.steinerberger(AT)gmail.com),
Dec 03 2007
|