|
|
A255616
|
|
Table read by antidiagonals, T(n,k) = floor(sqrt(k^n)), n >= 0, k >=1.
|
|
1
|
|
|
1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 3, 2, 1, 1, 2, 4, 5, 4, 1, 1, 2, 5, 8, 9, 5, 1, 1, 2, 6, 11, 16, 15, 8, 1, 1, 2, 7, 14, 25, 32, 27, 11, 1, 1, 3, 8, 18, 36, 55, 64, 46, 16, 1, 1, 3, 9, 22, 49, 88, 125, 128, 81, 22, 1, 1, 3, 10, 27, 64, 129, 216, 279, 256, 140, 32, 1, 1, 3, 11, 31, 81, 181, 343, 529, 625, 512, 243, 45, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,9
|
|
LINKS
|
|
|
FORMULA
|
T(n,k) = floor(sqrt(k^n)), n >= 0, k >=1.
|
|
EXAMPLE
|
See table in the links.
|
|
MATHEMATICA
|
T[n_, k_] := Floor[Sqrt[k^n]]; Table[T[k, n + 1 - k], {n, 0, 15}, {k, 0, n}] (* G. C. Greubel, Dec 30 2017 *)
|
|
PROG
|
(PARI){for(i=1, 20, for(n=0, i-1, a=floor(sqrt((i-n)^n)); print1(a, ", ")))}
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|