0,1
lst={}; s1=0; s2=0; s3=0; Do[s1=s1+Prime[n]; s2=s2+s1; s3=s3+s2; AppendTo[lst, s3], {n, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 15 2008]
Cf. A000040.
Adjacent sequences: A014147 A014148 A014149 this_sequence A014151 A014152 A014153
Sequence in context: A085070 A083383 A082289 this_sequence A136429 A091469 A125670
nonn
njas
Search completed in 0.002 seconds
