|
Search: id:A133397
|
|
|
| A133397 |
|
Triangular array read by rows: T(n,m)=prime(m+1)^n*prime(m)^(n*(n-1)/2) |
|
+0
1
|
|
| 1, 1, 3, 1, 5, 75, 1, 7, 245, 42875, 1, 11, 847, 456533, 1722499009, 1, 13, 1859, 2924207, 50597553721, 9630384192379093, 1, 17, 3757, 10793861, 403139914489, 195739344661245593, 1235503024454233619349733, 1, 19, 6137, 33698267
(list; table; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
EXAMPLE
|
{1},
{1, 3},
{1, 5, 75},
{1, 7, 245, 42875},
{1, 11, 847, 456533, 1722499009},
{1, 13, 1859, 2924207, 50597553721, 9630384192379093}
|
|
MATHEMATICA
|
a = Table[Table[If[m == 0, 1, Prime[m + 1]^n*Prime[m]^(n*(n - 1)/2)], {n, 0, m}], {m, 0, 10}]; Flatten[a]
|
|
CROSSREFS
|
Row sums are in A133396.
Sequence in context: A039512 A140825 A037280 this_sequence A096614 A011002 A113817
Adjacent sequences: A133394 A133395 A133396 this_sequence A133398 A133399 A133400
|
|
KEYWORD
|
nonn,tabl
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Nov 20 2007
|
|
|
Search completed in 0.002 seconds
|
