|
| |
|
|
A082906
|
|
Sum of terms in n-th row of modified Pascal-triangle displayed in A082905. All C[n,j] binomial coefficients are replaced by C[n/g,j/g], where g=GCD[n,j]; a(n)=Sum{C[n/g,j/g]}, j=0,...,n-1.
|
|
0
| |
|
|
1, 2, 4, 8, 12, 32, 22, 128, 140, 350, 294, 2048, 1638, 8192, 4890, 15878, 32908, 131072, 81184, 524288, 493582, 1165676, 1393770, 8388608, 5771318, 26910682, 23162026, 89478836, 131854546, 536870912, 352862112, 2147483648, 2147516556
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
EXAMPLE
| a(0)=1; a(12)=1+12+6+4,+3+792+2+792+3+4+6+12+1=1638.
|
|
|
MATHEMATICA
| Table[Apply[Plus, Table[Binomial[n/GCD[n, j], j/GCD[n, j]], {j, 0, n}]], {n, 0, 32}]
|
|
|
CROSSREFS
| Cf. A000005, A007318, A056045.
Sequence in context: A115386 A058771 A036493 * A204088 A187941 A085083
Adjacent sequences: A082903 A082904 A082905 * A082907 A082908 A082909
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Apr 23 2003
|
| |
|
|