A066098 - OEIS

%I #23 Dec 14 2024 17:44:50

%S 1,2,6,3,3,6,6,12,48,33,48,30,48,42,51,93,87,75,111,111,132,114,141,

%T 156,150,150,156,183,213,240,201,210,222,192,210,258,249,312,267,282,

%U 348,300,336,375,312,372,390,381,363,366,411,363,366,375,399,447

%N Sum of digits of primorial(n).

%H Harry J. Smith, <a href="/A066098/b066098.txt">Table of n, a(n) for n = 0..1000</a>

%F a(n) = A007953(A002110(n)).

%F a(n) = C*n*log(n) asymptotically with C=1.9...

%F If the digits are supposed equidistributed, a(n)=9/(2*log(10))*n*log(n) asymptotically, where 9/(2log(10))=1.9543251685... - _Benoit Cloitre_, Jan 05 2002

%t Table[ Apply[ Plus, IntegerDigits[ Product[ Prime[i], {i, 1, n} ]]], {n, 1, 55} ]

%o (PARI) a(n) = { sumdigits(vecprod(primes(n))) }  \\ _Harry J. Smith_, Nov 13 2009

%Y Cf. A007953 (sum of digits), A002110 (primorial).

%K nonn,base

%O 0,2

%A _Benoit Cloitre_, Dec 30 2001

%E More terms from _Robert G. Wilson v_, Dec 31 2001

%E Offset changed from 0 to 1 by _Harry J. Smith_, Nov 13 2009

%E a(0)=1 prepended by _Alois P. Heinz_, Dec 14 2024