login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A330887
Irregular triangle read by rows: T(n,k) is the number of partitions of n into k consecutive parts that differ by 3, n >= 1, k >= 1, and the first element of column k is in the row that is the k-th pentagonal number (A000326).
10
1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1, 0, 1, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 1, 0, 0, 1
OFFSET
1
COMMENTS
T(n,k) is 0 or 1, so T(n,k) represents the "existence" of the mentioned partition: 1 = exists, 0 = does not exist.
Since the trivial partition n is counted, so T(n,1) = 1.
This is an irregular triangle read by rows: T(n,k), n >= 1, k >= 1, in which column k lists 1's interleaved with k-1 zeros, and the first element of column k is in the row that is the k-th pentagonal number.
This triangle can be represented with a diagram of overlapping curves, in which every column of triangle is represented by a periodic curve.
For a general theorem about the triangles of this family see A303300.
EXAMPLE
Triangle begins (rows 1..22):
1;
1;
1;
1;
1, 1;
1, 0;
1, 1;
1, 0;
1, 1;
1, 0;
1, 1;
1, 0, 1;
1, 1, 0;
1, 0, 0;
1, 1, 1;
1, 0, 0;
1, 1, 0;
1, 0, 1;
1, 1, 0;
1, 0, 0;
1, 1, 1;
1, 0, 0, 1;
...
For n = 22 there are two partitions of 22 into consecutive parts that differ by 3, including 22 as a partition. They are [22] and [10, 7, 4, 1]. There are no partitions of this kind with two parts nor with three parts, so the 22nd row of the triangle is [1, 0, 0, 1].
MAPLE
A330887 := proc(n, k)
local first1 ;
first1 := A000325(k) ;
if n < first1 then
0 ;
elif modp(n-first1, k) = 0 then
1;
else
0;
end if;
end proc:
for n from 1 to 40 do
for k from 1 do
if n>= A000325(k) then
printf("%d, ", A330887(n, k)) ;
else
break;
end if;
end do:
printf("\n") ;
end do: # R. J. Mathar, Oct 02 2020
CROSSREFS
Row sums give A117277.
Triangles of the same family are A051731, A237048, A303300, this sequence, A334460.
Sequence in context: A136705 A141646 A129573 * A181652 A071024 A337263
KEYWORD
nonn,tabf
AUTHOR
Omar E. Pol, Apr 30 2020
STATUS
approved