|
| |
|
|
A066098
|
|
Sum of digits of primorial(n) (A002110).
|
|
1
| |
|
|
2, 6, 3, 3, 6, 6, 12, 48, 33, 48, 30, 48, 42, 51, 93, 87, 75, 111, 111, 132, 114, 141, 156, 150, 150, 156, 183, 213, 240, 201, 210, 222, 192, 210, 258, 249, 312, 267, 282, 348, 300, 336, 375, 312, 372, 390, 381, 363, 366, 411, 363, 366, 375, 399, 447
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
FORMULA
| a(n)=C*n*ln(n) asymptotically with C=1.9...
If the digits are supposed equidistributed, a(n)=9/(2*ln(10))*n*ln(n) asymptotically, where 9/(2ln(10))=1.9543251685... - Benoit Cloitre (benoit7848c(AT)orange.fr), Jan 05 2002
|
|
|
MATHEMATICA
| Table[ Apply[ Plus, IntegerDigits[ Product[ Prime[i], {i, 1, n} ]]], {n, 1, 55} ]
|
|
|
PROG
| (PARI) SumD(x)= { local(s=0); while (x>9, s+=x%10; x\=10); return(s + x) } { p=1; for (n=1, 1000, p*=prime(n); s=SumD(p); write("b066098.txt", n, " ", s) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 13 2009]
|
|
|
CROSSREFS
| Cf. A002110.
Sequence in context: A138054 A198418 A086360 * A123733 A163892 A130108
Adjacent sequences: A066095 A066096 A066097 * A066099 A066100 A066101
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Dec 30 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 31 2001
OFFSET changed from 0,1 to 1,1 by Harry J. Smith (hjsmithh(AT)sbcglobal.net), Nov 13 2009
|
| |
|
|
