%I A129980
%S A129980 1,2,4,7,6,3,15,12,18,9,15,24,24,33,24,33,24,33,24,51,42,51,33,51,69,51,
%T A129980 60,69,60,87,60,60,87,105,87,87,105,87,87,105,114,105,96,141,123,123,
%U A129980 159,150,159,150,141,141,132,168,159,150,177,159,159,168,195,186,195
%N A129980 Sum of the digits of the sum of n!!, with n>=0.
%e A129980 0!!=1
%e A129980 1!!=1 -> 1+1=2
%e A129980 2!!=2 -> 2+2=4
%e A129980 3!!=3 -> 4+3=7
%e A129980 4!!=8 -> 7+8=15 -> 1+5=6
%e A129980 5!!=15 -> 15+15=30 -> 3+0=3
%p A129980 P:=proc(n) local i,j,k,w,sf; sf:=1; for i from 0 by 1 to n do k:=i; w:=i-2; 
               while w>0 do k:=k*w; w:=w-2; od; sf:=sf+k; w:=0; k:=sf; while k>0 
               do w:=w+k-(trunc(k/10)*10); k:=trunc(k/10); od; print(w); od; end: 
               P(100);
%Y A129980 Sequence in context: A136790 A073158 A035311 this_sequence A126786 A154614 
               A161211
%Y A129980 Adjacent sequences: A129977 A129978 A129979 this_sequence A129981 A129982 
               A129983
%K A129980 easy,nonn,base
%O A129980 0,2
%A A129980 Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), Jun 14 2007