Search: id:A133489 Results 1-1 of 1 results found. %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, Home Page (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 Search completed in 0.001 seconds