login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A136459 A triangle of coefficients from the transorthogonal ( or simplex code) matrix characteristic polynomial: h(i,j)=-1/(2^(i+j)-1);i,j<=n; m(i,j)=2^n^2)*Inverse(h(i,j))/6;. 0
1, -1, -1, 3920, 588, 1, -8100814848000, -39479417600, -2979480, -1, 1611539173017517109941370880000, 61936836322916982325248000, 39909735720699801600, 163294580720, 1, -6618882426924155530592746398747608414335176303936798720000 (list; table; graph; refs; listen; history; text; internal format)
OFFSET

1,4

COMMENTS

Row sums are:

{1, -2, 4509, -8140297245081, 1611601109893749762807690510321,

-6618882924928306991992730326130237124487220310559174099681}

REFERENCES

http://www.ee.cityu.edu.hk/~eekwwong/ee40214/chapter3.pdf

LINKS

Table of n, a(n) for n=1..16.

FORMULA

h(i,j)=-1/(2^(i+j)-1);i,j<=n; m(i,j)=2^n^2)*Inverse(h(i,j))/6;

EXAMPLE

{1},

{-1, -1},

{3920, 588, 1},

{-8100814848000, -39479417600, -2979480, -1},

{1611539173017517109941370880000, 61936836322916982325248000,39909735720699801600, 163294580720, 1},

{-6618882426924155530592746398747608414335176303936798720000,-498004150819770968302750426840905467826794397696000, -641629015618830186439905263755182106214400,

-5802015429341199319726979481600,-113104918891987680, -1}

MATHEMATICA

M[w_] := Table[Table[ -1/(2^(n + m) - 1), {n, 1, w}], {m, 1, w}]; IM[w_] := Inverse[M[w]]; Join[{1}, Table[CharacteristicPolynomial[2^(n^2)*IM[n]/6, x], {n, 1, 5}]]; a = Join[{{1}}, Table[CoefficientList[CharacteristicPolynomial[2^(n^2)*IM[n]/6, x], x], {n, 1, 5}]]; Flatten[a] Join[{1}, Table[Apply[Plus, CoefficientList[CharacteristicPolynomial[2^(n^2)*IM[n]/6, x], x]], {n, 1, 5}]];

CROSSREFS

Sequence in context: A131409 A209732 A221239 * A235315 A229642 A266060

Adjacent sequences:  A136456 A136457 A136458 * A136460 A136461 A136462

KEYWORD

uned,tabl,sign

AUTHOR

Roger L. Bagula, Mar 20 2008

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 3 07:58 EDT 2021. Contains 346435 sequences. (Running on oeis4.)