|
%I #14 Jul 19 2015 01:16:40
%S 1,3,8,27,130,863,7554,84385,1165814,19408513,381328184,8690396907,
%T 226500350374,6671888768963,219904832427160,8040978338951561,
%U 323784549401655250,14264968083112608087
%N Previous term + prime(previous term).
%F a(1)=1; a(n)=a(n-1)+prime(a(n-1)).
%e a(4)=27 because a(3)=8, prime(8)=19 and 8+19=27.
%t se={1}; a=1; Do[b=a+Prime[a]; se=Append[se, b]; a=b, {i, 13}]; se
%t NestList[ Prime@# + # &, 1, 14] (* _Robert G. Wilson v_, Jul 17 2010 *)
%Y Cf. A007097, A179274. - _Robert G. Wilson v_, Jul 17 2010
%K nonn
%O 1,2
%A _Zak Seidov_, Sep 21 2002
%E a(15) from _Robert G. Wilson v_, Jul 17 2010
%E a(16)-a(18) from _Charles R Greathouse IV_, Mar 15 2011
|
