|
|
A139553
|
|
Triangle read by rows: T(n,k) = if n>=4*k and n<4*k*A014963(k) then k else 1; T(n,0)=1.
|
|
2
|
|
|
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,39
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
Row products of the triangle are:
1 = 1
1*1 = 1
1*1*1 = 1
1*1*1*1 = 1
1*1*1*1*1 = 1
1*1*1*1*1*1 = 1
1*1*1*1*1*1*1 = 1
1*1*1*1*1*1*1*1 = 1
1*1*2*1*1*1*1*1*1 = 2
|
|
PROG
|
(Excel) =if(and(row()-1>=(column()-1)*4; row()-1 < A014963(k-1)*(column()-1)*4); column()-1; 1)
(PARI)
up_to = 23220; \\ binomial(215+1, 2)
A139553tr(n, k) = if(0==k, 1, if((n>=(4*k))&&(n<(4*k*A014963(k))), k, 1));
A139553list(up_to) = { my(v = vector(up_to), i=0); for(n=1, oo, for(k=1, n, i++; if(i > up_to, return(v)); v[i] = A139553tr(n-1, k-1))); (v); };
v139553 = A139553list(up_to);
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|