|
|
A083291
|
|
Triangular array read by rows: T(n,k) = k*floor(n/10) + n mod 10, 0<=k<=n.
|
|
2
|
|
|
0, 1, 1, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 9, 9, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 3, 4, 5, 6, 7, 8, 9, 10, 11
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
COMMENTS
|
T(n,n) = n for n<=9, T(n,10) = n for n>9;
|
|
LINKS
|
|
|
EXAMPLE
|
Triangle begins:
[0] 0;
[1] 1, 1;
[2] 2, 2, 2;
[3] 3, 3, 3, 3;
[4] 4, 4, 4, 4, 4;
[5] 5, 5, 5, 5, 5, 5;
[6] 6, 6, 6, 6, 6, 6, 6;
[7] 7, 7, 7, 7, 7, 7, 7, 7;
[8] 8, 8, 8, 8, 8, 8, 8, 8, 8;
[9] 9, 9, 9, 9, 9, 9, 9, 9, 9, 9;
[10] 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10;
... (End)
|
|
MATHEMATICA
|
Table[k*Floor[n/10] + Mod[n, 10], {n, 0, 10}, {k, 0, n}]//Flatten (* Paolo Xausa, May 22 2024 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|