%I #6 Mar 29 2018 16:31:44
%S 0,1,5,11,19,28,29,32,37,43,50,59,61,64,68,74,81,89,98,108,111,116,
%T 122,129,137,146,157,169,173,179,187,196,206,218,231,236,242,249,258,
%U 268,279,291,304,310,318,327,337,348,360,374,389
%N Sum of digit-sums of first n nonprimes.
%t Accumulate[Total[IntegerDigits[#]]&/@Select[Range[0,80],!PrimeQ[#]&]] (* _Harvey P. Dale_, Mar 29 2018 *)
%K nonn,base,easy
%O 0,3
%A Armand Turpel armandt(AT)unforgettable.com
|