|
| |
|
|
A008725
|
|
Molien series for 3-dimensional group [2,n] = *22n.
|
|
5
| |
|
|
1, 2, 3, 4, 5, 6, 7, 9, 11, 13, 15, 17, 19, 21, 24, 27, 30, 33, 36, 39, 42, 46, 50, 54, 58, 62, 66, 70, 75, 80, 85, 90, 95, 100, 105, 111, 117, 123, 129, 135, 141, 147, 154, 161, 168, 175, 182, 189, 196, 204, 212, 220, 228, 236, 244, 252, 261, 270, 279, 288, 297, 306
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
LINKS
| INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 190
Index entries for Molien series
Index to sequences with linear recurrences with constant coefficients, signature (2,-1,0,0,0,0,1,-2,1). [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 20 2010]
|
|
|
FORMULA
| a(n) = sum(floor(j/7), {j,0,n+7}), a(n-7) = (1/2)floor(n/7)*(2n-5-7*floor(n/7)) [From Mitch Harris (maharri(AT)gmail.com), Sep 08 2008]
a(n) = +2*a(n-1) -a(n-2) +a(n-7) -2*a(n-8) +a(n-9). [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 20 2010]
|
|
|
MAPLE
| 1/(1-x)^2/(1-x^7)
|
|
|
MATHEMATICA
| s=0; lst={}; Do[AppendTo[lst, s+=n]; AppendTo[lst, s+=n]; AppendTo[lst, s+=n]; AppendTo[lst, s+=n]; AppendTo[lst, s+=n]; AppendTo[lst, s+=n]; AppendTo[lst, s+=n], {n, 0, 5!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Mar 14 2010]
|
|
|
CROSSREFS
| Sequence in context: A031876 A174738 A011867 * A026445 A030151 A131617
Adjacent sequences: A008722 A008723 A008724 * A008726 A008727 A008728
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
EXTENSIONS
| More terms, Mathematica program from Vladimir Orlovsky (4vladimir(AT)gmail.com), Mar 14 2010
|
| |
|
|
