A118714 -id:A118714 - cp's OEIS frontend

A303000 a(n) = permanent of the n X n matrix with entries a(i, i) = i^2 and a(i, j) = 1 elsewhere.

1, 5, 52, 918, 24630, 934938, 47736048, 3157054776, 262661665176, 26857133054424, 3311299323349920, 484541686800059760, 83031688670103506160, 16472545369548670950480, 3746065113561656467249920, 968109978211279792380074880, 282158259444905145777416119680

Offset: 1

Vaclav Kotesovec, Apr 17 2018

nonn

Vaclav Kotesovec, Table of n, a(n) for n = 1..36

Cf. A007840, A010791, A067550, A118714, A303001.

Table[Permanent[DiagonalMatrix[Table[i^2-1, {i, 1, n}]] + 1], {n, 1, 20}]

{a(n) = matpermanent(matrix(n, n, i, j, if(i==j, i^2, 1)))}
for(n=1, 20, print1(a(n), ", ")) \\ Vaclav Kotesovec, Dec 20 2018

A303001 a(n) = permanent of the n X n matrix with entries a(i, i) = i*(i+1)/2 and a(i, j) = 1 elsewhere.

Original entry on oeis.org

1, 4, 30, 356, 6106, 142760, 4363848, 168986136, 8087082144, 468807362736, 32379640476000, 2627735592279600, 247610398718738640, 26815386224063189760, 3307855985755600598400, 461149884030679844958720, 72151124506962747825006720, 12590610689213961622942752000

Offset: 1

Vaclav Kotesovec, Apr 17 2018

nonn

Vaclav Kotesovec, Table of n, a(n) for n = 1..36

Cf. A007840, A010791, A067550, A118714, A303000.

Table[Permanent[DiagonalMatrix[Table[i*(i+1)/2-1, {i, 1, n}]] + 1], {n, 1, 20}]

{a(n) = matpermanent(matrix(n, n, i, j, if(i==j, i*(i+1)/2, 1)))}
for(n=1, 20, print1(a(n), ", ")) \\ Vaclav Kotesovec, Dec 20 2018

cp's OEIS Frontend

A303000 a(n) = permanent of the n X n matrix with entries a(i, i) = i^2 and a(i, j) = 1 elsewhere.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI