|
Search: id:A145076
|
|
|
| A145076 |
|
a(n) = [x^(6^n)] Q(x,n)^(n+1) where Q(x,n) = Sum_{k=0..n} x^(6^k)*(1 - x^(5*6^k))/(1 - x^(6^k)) for n>=0. |
|
+0
4
|
| |
|
|
OFFSET
|
0,2
|
|
|
EXAMPLE
|
a(n) equals the coefficient of x^(6^n) in Q(x,n)^(n+1) where
Q(x,n) = Sum_{k=0..n} (x^(6^k) + x^(2*6^k) + x^(3*6^k) + x^(4*6^k) + x^(5*6^k)) for n>=0.
|
|
MAPLE
|
Q:=proc(x, n) options operator, arrow: sum(x^(6^k)+x^(2*6^k)+x^(3*6^k)+x^(4*6^k)+x^(5*6^k), k=0..n) end proc: seq(coeff(Q(x, n)^(n+1), x, 6^n), n=0..6); [From Emeric Deutsch (deutsch(AT)duke.poly.edu), Oct 20 2008]
|
|
PROGRAM
|
(PARI) {a(n, q=6)=local(Q=sum(j=0, n, (x^(q^j)-x^(q*q^j))/(1-x^(q^j)+O(x^(q^n+1))))); polcoeff(Q^(n+1), q^n)}
|
|
CROSSREFS
|
Cf. A007178, A145073, A145074, A145075.
Sequence in context: A144575 A005452 A143600 this_sequence A165656 A145773 A072324
Adjacent sequences: A145073 A145074 A145075 this_sequence A145077 A145078 A145079
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Oct 09 2008
|
|
EXTENSIONS
|
a(6) from Emeric Deutsch (deutsch(AT)duke.poly.edu), Oct 20 2008
|
|
|
Search completed in 0.002 seconds
|
