cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 11-20 of 195 results. Next

A193870 Triangle of regions and partitions of integers (see Comments lines for definition).

Original entry on oeis.org

1, 2, 1, 3, 1, 1, 2, 0, 0, 0, 4, 2, 1, 1, 1, 3, 0, 0, 0, 0, 0, 5, 2, 1, 1, 1, 1, 1, 2, 0, 0, 0, 0, 0, 0, 0, 4, 2, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 3, 2, 2, 1, 1, 1, 1, 1, 1, 1, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 5, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 7, 3, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
Offset: 1

Views

Author

Omar E. Pol, Aug 07 2011

Keywords

Comments

Triangle T(n,k) read by rows in which, from rows 1..n, if r = T(n,k) is a record in the sequence then the set of positive integers in every row (from 1 to n) is called a “region” of r. Note that n, the number of regions of r is also the number of partitions of r. The consecutive records "r" are the natural numbers A000027. The triangle has the property that, for rows n..1, the diagonals (without the zeros) are also the partitions of r, in juxtaposed reverse-lexicographical order. Note that a record "r" is the initial term of a row if such row contains 1’s. If T(n,k) is a record in the sequence then A000041(T(n,k)) = n. Note that if T(n,k) < 2 is not the last term of the row n then T(n,k+1) = T(n,k). The union of the rows that contain 1's gives A182715.

Examples

			Triangle begins:
1,
2, 1,
3, 1, 1,
2, 0, 0, 0,
4, 2, 1, 1, 1,
3, 0, 0, 0, 0, 0,
5, 2, 1, 1, 1, 1, 1,
2, 0, 0, 0, 0, 0, 0, 0,
4, 2, 0, 0, 0, 0, 0, 0, 0,
3, 0, 0, 0, 0, 0, 0, 0, 0, 0,
6, 3, 2, 2, 1, 1, 1, 1, 1, 1, 1,
…
For n = 11 note that the row n contains the 6th record in the sequence: T(11,1) = a(56) = 6, then consider the first 11 rows of triangle. Note that the diagonals d, from d = n..1, without the zeros, are also the partitions of 6 in juxtaposed reverse-lexicographical order: [6], [3, 3], [4, 2], [2, 2, 2], [5, 1], [3, 2, 1], [4, 1, 1], [2, 2, 1, 1], [3, 1, 1, 1], [2, 1, 1, 1, 1], [1, 1, 1, 1, 1, 1]. See A026792.
		

Crossrefs

Mirror of triangle A186114. Column 1 gives A141285. Right diagonal gives A167392.

Programs

Formula

T(n,1) = A141285(n).
T(n,k) = A167392(n), if k = n.

A338156 Irregular triangle read by rows in which row n lists n blocks, where the m-th block consists of A000041(m-1) copies of the divisors of (n - m + 1), with 1 <= m <= n.

Original entry on oeis.org

1, 1, 2, 1, 1, 3, 1, 2, 1, 1, 1, 2, 4, 1, 3, 1, 2, 1, 2, 1, 1, 1, 1, 5, 1, 2, 4, 1, 3, 1, 3, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 2, 3, 6, 1, 5, 1, 2, 4, 1, 2, 4, 1, 3, 1, 3, 1, 3, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 2, 3, 6, 1, 5, 1, 5, 1, 2, 4, 1, 2, 4, 1, 2, 4
Offset: 1

Views

Author

Omar E. Pol, Oct 14 2020

Keywords

Comments

In other words: in row n replace every term of n-th row of A176206 with its divisors.
The terms in row n are also all parts of all partitions of n.
As in A336812 here we introduce a new type of table which shows the correspondence between divisors and partitions. More precisely the table shows the correspondence between all divisors of all terms of the n-th row of A176206 and all parts of all partitions of n, with n >= 1. Both the mentionded divisors and the mentioned parts are the same numbers (see Example section). That is because all divisors of the first A000070(n-1) terms of A336811 are also all parts of all partitions of n.
For an equivalent table for all parts of the last section of the set of partitions of n see the subsequence A336812. The section is the smallest substructure of the set of partitions in which appears the correspondence divisor/part.
From Omar E. Pol, Aug 01 2021: (Start)
The terms of row n appears in the triangle A346741 ordered in accordance with the successive sections of the set of partitions of n.
The terms of row n in nonincreasing order give the n-th row of A302246.
The terms of row n in nondecreasing order give the n-th row of A302247.
For the connection with the tower described in A221529 see also A340035. (End)

Examples

			Triangle begins:
  [1];
  [1,2],   [1];
  [1,3],   [1,2],   [1],   [1];
  [1,2,4], [1,3],   [1,2], [1,2], [1],   [1],   [1];
  [1,5],   [1,2,4], [1,3], [1,3], [1,2], [1,2], [1,2], [1], [1], [1], [1], [1];
  ...
For n = 5 the 5th row of A176206 is [5, 4, 3, 3, 2, 2, 2, 1, 1, 1, 1, 1] so replacing every term with its divisors we have the 5th row of this triangle.
Also, if the sequence is written as an irregular tetrahedron so the first six slices are:
  [1],
  -------
  [1, 2],
  [1],
  -------
  [1, 3],
  [1, 2],
  [1],
  [1];
  ----------
  [1, 2, 4],
  [1, 3],
  [1, 2],
  [1, 2],
  [1],
  [1],
  [1];
  ----------
  [1, 5],
  [1, 2, 4],
  [1, 3],
  [1, 3],
  [1, 2],
  [1, 2],
  [1, 2],
  [1],
  [1],
  [1],
  [1],
  [1];
.
The above slices appear in the lower zone of the following table which shows the correspondence between the mentioned divisors and all parts of all partitions of the positive integers.
The table is infinite. It is formed by three zones as follows:
The upper zone shows the partitions of every positive integer in colexicographic order (cf. A026792, A211992).
The lower zone shows the same numbers but arranged as divisors in accordance with the slices of the tetrahedron mentioned above.
Finally the middle zone shows the connection between the upper zone and the lower zone.
For every positive integer the numbers in the upper zone are the same numbers as in the lower zone.
.
|---|---------|-----|-------|---------|------------|---------------|
| n |         |  1  |   2   |    3    |      4     |       5       |
|---|---------|-----|-------|---------|------------|---------------|
| P |         |     |       |         |            |               |
| A |         |     |       |         |            |               |
| R |         |     |       |         |            |               |
| T |         |     |       |         |            |  5            |
| I |         |     |       |         |            |  3  2         |
| T |         |     |       |         |  4         |  4  1         |
| I |         |     |       |         |  2  2      |  2  2  1      |
| O |         |     |       |  3      |  3  1      |  3  1  1      |
| N |         |     |  2    |  2 1    |  2  1 1    |  2  1  1 1    |
| S |         |  1  |  1 1  |  1 1 1  |  1  1 1 1  |  1  1  1 1 1  |
----|---------|-----|-------|---------|------------|---------------|
.
|---|---------|-----|-------|---------|------------|---------------|
|   | A181187 |  1  |  3 1  |  6 2 1  | 12  5 2 1  | 20  8  4 2 1  |
|   |         |  |  |  |/|  |  |/|/|  |  |/ |/|/|  |  |/ | /|/|/|  |
| L | A066633 |  1  |  2 1  |  4 1 1  |  7  3 1 1  | 12  4  2 1 1  |
| I |         |  *  |  * *  |  * * *  |  *  * * *  |  *  *  * * *  |
| N | A002260 |  1  |  1 2  |  1 2 3  |  1  2 3 4  |  1  2  3 4 5  |
| K |         |  =  |  = =  |  = = =  |  =  = = =  |  =  =  = = =  |
|   | A138785 |  1  |  2 2  |  4 2 3  |  7  6 3 4  | 12  8  6 4 5  |
|   |         |  |  |  |\|  |  |\|\|  |  |\ |\|\|  |  |\ |\ |\|\|  |
|   | A206561 |  1  |  4 2  |  9 5 3  | 20 13 7 4  | 35 23 15 9 5  |
|---|---------|-----|-------|---------|------------|---------------|
.
|---|---------|-----|-------|---------|------------|---------------|
|   | A027750 |  1  |  1 2  |  1   3  |  1  2   4  |  1         5  |
|   |---------|-----|-------|---------|------------|---------------|
|   | A027750 |     |  1    |  1 2    |  1    3    |  1  2    4    |
|   |---------|-----|-------|---------|------------|---------------|
| D | A027750 |     |       |  1      |  1  2      |  1     3      |
| I | A027750 |     |       |  1      |  1  2      |  1     3      |
| V |---------|-----|-------|---------|------------|---------------|
| I | A027750 |     |       |         |  1         |  1  2         |
| S | A027750 |     |       |         |  1         |  1  2         |
| O | A027750 |     |       |         |  1         |  1  2         |
| R |---------|-----|-------|---------|------------|---------------|
| S | A027750 |     |       |         |            |  1            |
|   | A027750 |     |       |         |            |  1            |
|   | A027750 |     |       |         |            |  1            |
|   | A027750 |     |       |         |            |  1            |
|   | A027750 |     |       |         |            |  1            |
|---|---------|-----|-------|---------|------------|---------------|
.
Note that every row in the lower zone lists A027750.
Also the lower zone for every positive integer can be constructed using the first n terms of the partition numbers. For example: for n = 5 we consider the first 5 terms of A000041 (that is [1, 1, 2, 3, 5]) then the 5th slice is formed by a block with the divisors of 5, one block with the divisors of 4, two blocks with the divisors of 3, three blocks with the divisors of 2, and five blocks with the divisors of 1.
Note that the lower zone is also in accordance with the tower (a polycube) described in A221529 in which its terraces are the symmetric representation of sigma starting from the top (cf. A237593) and the heights of the mentioned terraces are the partition numbers A000041 starting from the base.
The tower has the same volume (also the same number of cubes) equal to A066186(n) as a prism of partitions of size 1*n*A000041(n).
The above table shows the correspondence between the prism of partitions and its associated tower since the number of parts in all partitions of n is equal to A006128(n) equaling the number of divisors in the n-th slice of the lower table and equaling the same the number of terms in the n-th row of triangle. Also the sum of all parts of all partitions of n is equal to A066186(n) equaling the sum of all divisors in the n-th slice of the lower table and equaling the sum of the n-th row of triangle.
		

Crossrefs

Nonzero terms of A340031.
Row n has length A006128(n).
The sum of row n is A066186(n).
The product of row n is A007870(n).
Row n lists the first n rows of A336812 (a subsequence).
The number of parts k in row n is A066633(n,k).
The sum of all parts k in row n is A138785(n,k).
The number of parts >= k in row n is A181187(n,k).
The sum of all parts >= k in row n is A206561(n,k).
The number of parts <= k in row n is A210947(n,k).
The sum of all parts <= k in row n is A210948(n,k).

Programs

  • Mathematica
    A338156[rowmax_]:=Table[Flatten[Table[ConstantArray[Divisors[n-m],PartitionsP[m]],{m,0,n-1}]],{n,rowmax}];
    A338156[10] (* Generates 10 rows *) (* Paolo Xausa, Jan 12 2023 *)
  • PARI
    A338156(rowmax)=vector(rowmax,n,concat(vector(n,m,concat(vector(numbpart(m-1),i,divisors(n-m+1))))));
    A338156(10) \\ Generates 10 rows - Paolo Xausa, Feb 17 2023

A194447 Rank of the n-th region of the set of partitions of j, if 1<=n<=A000041(j).

Original entry on oeis.org

0, 0, 0, 1, -1, 2, -2, 1, 2, 2, -5, 2, 3, 3, -8, 1, 2, 2, 2, 4, 3, -14, 2, 3, 3, 3, 2, 4, 4, -21, 1, 2, 2, 2, 4, 3, 1, 3, 5, 5, 4, -32, 2, 3, 3, 3, 2, 4, 4, 1, 4, 3, 5, 6, 5, -45, 1, 2, 2, 2, 4, 3, 1, 3, 5, 5, 4, -2, 2, 4, 4, 5, 3, 6, 6, 5, -65
Offset: 1

Views

Author

Omar E. Pol, Dec 04 2011

Keywords

Comments

Here the rank of a "region" is defined to be the largest part minus the number of parts (the same idea as the Dyson's rank of a partition).
Also triangle read by rows: T(j,k) = rank of the k-th region of the last section of the set of partitions of j.
The sum of every row is equal to zero.
Note that in some rows there are several negative terms. - Omar E. Pol, Oct 27 2012
For the definition of "region" see A206437. See also A225600 and A225610. - Omar E. Pol, Aug 12 2013

Examples

			In the triangle T(j,k) for j = 6 the number of regions in the last section of the set of partitions of 6 is equal to 4. The first region given by [2] has rank 2-1 = 1. The second region given by [4,2] has rank 4-2 = 2. The third region given by [3] has rank 3-1 = 2. The fourth region given by [6,3,2,2,1,1,1,1,1,1,1] has rank 6-11 = -5 (see below):
From _Omar E. Pol_, Aug 12 2013: (Start)
---------------------------------------------------------
.    Regions       Illustration of ranks of the regions
---------------------------------------------------------
.    For J=6        k=1     k=2      k=3        k=4
.  _ _ _ _ _ _                              _ _ _ _ _ _
. |_ _ _      |                     _ _ _   .          |
. |_ _ _|_    |           _ _ _ _   * * .|    .        |
. |_ _    |   |     _ _   * * .  |              .      |
. |_ _|_ _|_  |     * .|        .|                .    |
.           | |                                     .  |
.           | |                                       .|
.           | |                                       *|
.           | |                                       *|
.           | |                                       *|
.           | |                                       *|
.           |_|                                       *|
.
So row 6 lists:     1       2         2              -5
(End)
Written as a triangle begins:
0;
0;
0;
1,-1;
2,-2;
1,2,2,-5;
2,3,3,-8;
1,2,2,2,4,3,-14;
2,3,3,3,2,4,4,-21;
1,2,2,2,4,3,1,3,5,5,4,-32;
2,3,3,3,2,4,4,1,4,3,5,6,5,-45;
1,2,2,2,4,3,1,3,5,5,4,-2,2,4,4,5,3,6,6,5,-65;
2,3,3,3,2,4,4,1,4,3,5,6,5,-3,3,5,5,4,5,4,7,7,6,-88;
		

Crossrefs

Row j has length A187219(j). The absolute value of the last term of row j is A000094(j+1). Row sums give A000004.

Formula

a(n) = A141285(n) - A194446(n). - Omar E. Pol, Dec 05 2011

A186412 Sum of all parts in the n-th region of the set of partitions of j, if 1<=n<=A000041(j).

Original entry on oeis.org

1, 3, 5, 2, 9, 3, 12, 2, 6, 3, 20, 3, 7, 4, 25, 2, 6, 3, 13, 5, 4, 38, 3, 7, 4, 14, 3, 9, 5, 49, 2, 6, 3, 13, 5, 4, 23, 4, 10, 6, 5, 69, 3, 7, 4, 14, 3, 9, 5, 27, 5, 4, 15, 7, 6, 87, 2, 6, 3, 13, 5, 4, 23, 4, 10, 6, 5, 39, 3, 9, 5, 19, 4, 12, 7, 6, 123
Offset: 1

Views

Author

Omar E. Pol, Aug 12 2011

Keywords

Comments

Also triangle read by rows: T(j,k) = sum of all parts in the k-th region of the last section of the set of partitions of j. See Example section. For more information see A135010. - Omar E. Pol, Nov 26 2011
For the definition of "region" see A206437. - Omar E. Pol, Aug 19 2013

Examples

			Contribution from Omar E. Pol, Nov 26 2011 (Start):
Written as a triangle:
1;
3;
5;
2,9;
3,12;
2,6,3,20;
3,7,4,25;
2,6,3,13,5,4,38;
3,7,4,14,3,9,5,49;
2,6,3,13,5,4,23,4,10,6,5,69;
3,7,4,14,3,9,5,27,5,4,15,7,6,87;
2,6,3,13,5,4,23,4,10,6,5,39,3,9,5,19,4,12,7,6,123;
(End)
From _Omar E. Pol_, Aug 18 2013: (Start)
Illustration of initial terms (first seven regions):
.                                             _ _ _ _ _
.                                     _ _ _  |_ _ _ _ _|
.                           _ _ _ _  |_ _ _|       |_ _|
.                     _ _  |_ _ _ _|                 |_|
.             _ _ _  |_ _|     |_ _|                 |_|
.       _ _  |_ _ _|             |_|                 |_|
.   _  |_ _|     |_|             |_|                 |_|
.  |_|   |_|     |_|             |_|                 |_|
.
.   1     3       5     2         9       3          12
.
(End)
		

Crossrefs

Row sums of triangle A186114 and of triangle A193870.
Row j has length A187219(j).
Row sums give A138879.
Right border gives A046746, j >= 1.
Records give A046746, j >= 1.
Partial sums give A182244.

Programs

  • Mathematica
    lex[n_]:=DeleteCases[Sort@PadRight[Reverse /@ IntegerPartitions@n], x_ /; x==0,2];
    A186412 = {}; l = {};
    For[j = 1, j <= 50, j++,
      mx = Max@lex[j][[j]]; AppendTo[l, mx];
      For[i = j, i > 0, i--, If[l[[i]] > mx, Break[]]];
      AppendTo[A186412, Total@Take[Reverse[First /@ lex[mx]], j - i]];
      ];
    A186412  (* Robert Price, Jul 25 2020 *)

Formula

a(A000041(n)) = A046746(n).

A207031 Triangle read by rows: T(n,k) = sum of all parts of the k-th column of the last section of the set of partitions of n.

Original entry on oeis.org

1, 2, 1, 3, 1, 1, 6, 3, 1, 1, 8, 3, 2, 1, 1, 15, 8, 4, 2, 1, 1, 19, 8, 5, 3, 2, 1, 1, 32, 17, 9, 6, 3, 2, 1, 1, 42, 20, 13, 7, 5, 3, 2, 1, 1, 64, 34, 19, 13, 8, 5, 3, 2, 1, 1, 83, 41, 26, 16, 11, 7, 5, 3, 2, 1, 1, 124, 68, 41, 27, 17, 12, 7, 5, 3, 2, 1, 1
Offset: 1

Views

Author

Omar E. Pol, Feb 14 2012

Keywords

Comments

Also T(n,k) is the number of parts >= k in the last section of the set of partitions of n. Therefore T(n,1) = A138137(n), the total number of parts in the last section of the set of partitions of n. For calculation of the number of odd/even parts, etc, follow the same rules from A206563.
More generally, let m and n be two positive integers such that m <= n. It appears that any set formed by m connected sections, or m disconnected sections, or a mixture of both, has the same properties described in the entry A206563.
It appears that reversed rows converge to A000041.
It appears that the first differences of row n together with 1 give the row n of triangle A182703 (see example). - Omar E. Pol, Feb 26 2012

Examples

			Illustration of initial terms. First six rows of triangle as sums of columns from the last sections of the first six natural numbers (or as sums of columns from the six sections of 6):
.                                         6
.                                         3 3
.                                         4 2
.                                         2 2 2
.                            5              1
.                            3 2              1
.                  4           1              1
.                  2 2           1              1
.          3         1           1              1
.     2      1         1           1              1
.  1    1      1         1           1              1
. --- --- ------- --------- ----------- --------------
A: 1, 2,1, 3,1,1,  6,3,1,1,  8,3,2,1,1,  15,8,4,2,1,1
.  |  |/|  |/|/|   |/|/|/|   |/|/|/|/|    |/|/|/|/|/|
B: 1, 1,1, 2,0,1,  3,2,0,1,  5,1,1,0,1,   7,4,2,1,0,1
.
A := initial terms of this triangle.
B := initial terms of triangle A182703.
.
Triangle begins:
1;
2,    1;
3,    1,  1;
6,    3,  1,  1;
8,    3,  2,  1,  1;
15,   8,  4,  2,  1,  1;
19,   8,  5,  3,  2,  1,  1;
32,  17,  9,  6,  3,  2,  1,  1;
42,  20, 13,  7,  5,  3,  2,  1,  1;
64,  34, 19, 13,  8,  5,  3,  2,  1,  1;
83,  41, 26, 16, 11,  7,  5,  3,  2,  1,  1;
124, 68, 41, 27, 17, 12,  7,  5,  3,  2,  1,  1;
		

Crossrefs

Formula

From Omar E. Pol, Dec 07 2019: (Start)
From the formula in A138135 (year 2008) we have that:
A000041(n-1) = A138137(n) - A138135(n) = T(n,1) - T(n,2);
Hence A000041(n) = T(n+1,1) - T(n+1,2), n >= 0;
Also A000041(n) = A002865(n) + T(n,1) - T(n,2). (End)

Extensions

More terms from Alois P. Heinz, Feb 17 2012

A336812 Irregular triangle read by rows T(n,k), n >= 1, k >= 1, in which row n is constructed replacing every term of row n of A336811 with its divisors.

Original entry on oeis.org

1, 1, 2, 1, 3, 1, 1, 2, 4, 1, 2, 1, 1, 5, 1, 3, 1, 2, 1, 1, 1, 2, 3, 6, 1, 2, 4, 1, 3, 1, 2, 1, 2, 1, 1, 1, 7, 1, 5, 1, 2, 4, 1, 3, 1, 3, 1, 2, 1, 2, 1, 1, 1, 1, 1, 2, 4, 8, 1, 2, 3, 6, 1, 5, 1, 2, 4, 1, 2, 4, 1, 3, 1, 3, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 3, 9, 1, 7, 1, 2, 3, 6
Offset: 1

Views

Author

Omar E. Pol, Nov 20 2020

Keywords

Comments

Here we introduce a new type of table which shows the correspondence between divisors and partitions. More precisely the table shows the corresponce between all parts of the last section of the set of partitions of n and all divisors of all terms of the n-th row of A336811, with n >= 1. The mentionded parts and the mentioned divisors are the same numbers (see Example section).
For an equivalent table showing the same kind of correspondence for all partitions of all positive integers see the supersequence A338156.

Examples

			Triangle begins:
  [1];
  [1, 2];
  [1, 3],       [1];
  [1, 2, 4],    [1, 2],    [1];
  [1, 5],       [1, 3],    [1, 2], [1],    [1];
  [1, 2, 3, 6], [1, 2, 4], [1, 3], [1, 2], [1, 2], [1], [1];
  ...
For n = 6 the 6th row of A336811 is [6, 4, 3, 2, 2, 1, 1] so replacing every term with its divisors we have {[1, 2, 3, 6], [1, 2, 4], [1, 3], [1, 2], [1, 2], [1], [1]} the same as the 6th row of this triangle.
Also, if the sequence is written as an irregular tetrahedron so the first six slices are:
  -------------
  [1],
  -------------
  [1, 2];
  -------------
  [1, 3],
  [1];
  -------------
  [1, 2, 4],
  [1, 2],
  [1];
  -------------
  [1, 5],
  [1, 3],
  [1, 2],
  [1],
  [1];
  -------------
  [1, 2, 3, 6],
  [1, 2, 4],
  [1, 3],
  [1, 2],
  [1, 2],
  [1],
  [1];
  -------------
The above slices appear in the lower zone of the following table which shows the correspondence between the mentioned divisors and the parts of the last section of the set of partitions of the positive integers.
The table is infinite. It is formed by three zones as follows:
The upper zone shows the last section of the set of partitions of every positive integer.
The lower zone shows the same numbers but arranged as divisors in accordance with the slices of the tetrahedron mentioned above.
Finally the middle zone shows the connection between the upper zone and the lower zone.
For every positive integer the numbers in the upper zone are the same numbers as in the lower zone.
|---|---------|-----|-------|---------|-----------|-------------|---------------|
| n |         |  1  |   2   |    3    |     4     |      5      |       6       |
|---|---------|-----|-------|---------|-----------|-------------|---------------|
|   |         |     |       |         |           |             |  6            |
| P |         |     |       |         |           |             |  3 3          |
| A |         |     |       |         |           |             |  4 2          |
| R |         |     |       |         |           |             |  2 2 2        |
| T |         |     |       |         |           |  5          |    1          |
| I |         |     |       |         |           |  3 2        |      1        |
| T |         |     |       |         |  4        |    1        |      1        |
| I |         |     |       |         |  2 2      |      1      |        1      |
| O |         |     |       |  3      |    1      |      1      |        1      |
| N |         |     |  2    |    1    |      1    |        1    |          1    |
| S |         |  1  |    1  |      1  |        1  |          1  |            1  |
|---|---------|-----|-------|---------|-----------|-------------|---------------|
.
|---|---------|-----|-------|---------|-----------|-------------|---------------|
|   | A207031 |  1  |  2 1  |  3 1 1  |  6 3 1 1  |  8 3 2 1 1  | 15 8 4 2 1 1  |
| L |         |  |  |  |/|  |  |/|/|  |  |/|/|/|  |  |/|/|/|/|  |  |/|/|/|/|/|  |
| I | A182703 |  1  |  1 1  |  2 0 1  |  3 2 0 1  |  5 1 1 0 1  |  7 4 2 1 0 1  |
| N |         |  *  |  * *  |  * * *  |  * * * *  |  * * * * *  |  * * * * * *  |
| K | A002260 |  1  |  1 2  |  1 2 3  |  1 2 3 4  |  1 2 3 4 5  |  1 2 3 4 5 6  |
|   |         |  =  |  = =  |  = = =  |  = = = =  |  = = = = =  |  = = = = = =  |
|   | A207383 |  1  |  1 2  |  2 0 3  |  3 4 0 4  |  5 2 3 0 5  |  7 8 6 4 0 6  |
|---|---------|-----|-------|---------|-----------|-------------|---------------|
.
|---|---------|-----|-------|---------|-----------|-------------|---------------|
|   | A027750 |  1  |  1 2  |  1   3  |  1 2   4  |  1       5  |  1 2 3     6  |
| D |---------|-----|-------|---------|-----------|-------------|---------------|
| I | A027750 |     |       |  1      |  1 2      |  1   3      |  1 2   4      |
| V |---------|-----|-------|---------|-----------|-------------|---------------|
| I | A027750 |     |       |         |  1        |  1 2        |  1   3        |
| S |---------|-----|-------|---------|-----------|-------------|---------------|
| O | A027750 |     |       |         |           |  1          |  1 2          |
| R | A027750 |     |       |         |           |  1          |  1 2          |
| S |---------|-----|-------|---------|-----------|-------------|---------------|
|   | A027750 |     |       |         |           |             |  1            |
|   | A027750 |     |       |         |           |             |  1            |
|---|---------|-----|-------|---------|-----------|-------------|---------------|
.
Note that every row in the lower zone lists A027750.
The "section" is the simpler substructure of the set of partitions of n that has this property in the three zones.
Also the lower zone for every positive integer can be constructed using the first n terms of A002865. For example: for n = 6 we consider the first 6 terms of A002865 (that is [1, 0, 1, 1, 2, 2]) and then the 6th slice is formed by a block with the divisors of 6, no block with the divisors of 5, one block with the divisors of 4, one block with the divisors of 3, two blocks with the divisors of 2 and two blocks with the divisors of 1.
Note that the lower zone is also in accordance with the tower (a polycube) described in A221529 in which its terraces are the symmetric representation of sigma starting from the top (cf. A237593) and the heights of the mentioned terraces are the partition numbers A000041 starting from the base.
The tower has the same volume (also the same number of cubes) equal to A066186(n) as a prism of partitions of size 1*n*A000041(n).
The above table shows the growth step by step of both the prism of partitions and its associated tower since the number of parts in the last section of the set of partitions of n is equal to A138137(n) equaling the number of divisors in the n-th slice of the lower table and equaling the same the number of terms in the n-th row of triangle. Also the sum of all parts in the last section of the set of partitions of n is equal to A138879(n) equaling the sum of all divisors in the n-th slice of the lower table and equaling the sum of the n-th row of triangle.
		

Crossrefs

Programs

  • Mathematica
    A336812[row_]:=Flatten[Table[ConstantArray[Divisors[row-m],PartitionsP[m]-PartitionsP[m-1]],{m,0,row-1}]];
    Array[A336812,10] (* Generates 10 rows *) (* Paolo Xausa, Feb 16 2023 *)

A182699 Number of emergent parts in all partitions of n.

Original entry on oeis.org

0, 0, 0, 0, 1, 1, 4, 4, 10, 12, 22, 27, 47, 56, 89, 112, 164, 205, 294, 364, 505, 630, 845, 1052, 1393, 1719, 2235, 2762, 3533, 4343, 5506, 6730, 8443, 10296, 12786, 15531, 19161, 23161, 28374, 34201, 41621, 49975, 60513, 72385, 87200, 103999, 124670, 148209
Offset: 0

Views

Author

Omar E. Pol, Nov 29 2010

Keywords

Comments

Here the "emergent parts" of the partitions of n are defined to be the parts (with multiplicity) of all the partitions that do not contain "1" as a part, removed by one copy of the smallest part of every partition. Note that these parts are located in the head of the last section of the set of partitions of n.
Also, here the "filler parts" of the partitions of n are defined to be the parts of the last section of the set of partitions of n that are not the emergent parts.
For n >= 4, length of row n of A183152. - Omar E. Pol, Aug 08 2011
Also total number of parts of the regions that do not contain 1 as a part in the last section of the set of partitions of n (cf. A083751, A187219). - Omar E. Pol, Mar 04 2012

Examples

			For n = 6 the partitions of 6 contain four "emergent" parts: (3), (4), (2), (2), so a(6) = 4. See below the location of the emergent parts.
6
(3) + 3
(4) + 2
(2) + (2) + 2
5 + 1
3 + 2 + 1
4 + 1 + 1
2 + 2 + 1 + 1
3 + 1 + 1 + 1
2 + 1 + 1 + 1 + 1
1 + 1 + 1 + 1 + 1 + 1
For a(10) = 22 see the link for the location of the 22 "emergent parts" (colored yellow and green) and the location of the 42 "filler parts" (colored blue) in the last section of the set of partitions of 10.
		

Crossrefs

Programs

  • Maple
    b:= proc(n, i) option remember; local t, h;
          if n<0 then [0, 0, 0]
        elif n=0 then [0, 1, 0]
        elif i<2 then [0, 0, 0]
        else t:= b(n, i-1); h:= b(n-i, i);
             [t[1]+h[1]+h[2], t[2], t[3]+h[3]+h[1]]
          fi
        end:
    a:= n-> b(n, n)[3]:
    seq (a(n), n=0..50);  # Alois P. Heinz, Oct 21 2011
  • Mathematica
    b[n_, i_] := b[n, i] = Module[{t, h}, Which[n<0, {0, 0, 0}, n == 0, {0, 1, 0}, i<2 , {0, 0, 0}, True, t = b[n, i-1]; h = b[n-i, i]; Join [t[[1]] + h[[1]] + h[[2]], t[[2]], t[[3]] + h[[3]] + h[[1]] ]]]; a[n_] := b[n, n][[3]]; Table[a[n], {n, 0, 50}] (* Jean-François Alcover, Jun 18 2015, after Alois P. Heinz *)

Formula

a(n) = A138135(n) - A002865(n), n >= 1.
From Omar E. Pol, Oct 21 2011: (Start)
a(n) = A006128(n) - A006128(n-1) - A000041(n), n >= 1.
a(n) = A138137(n) - A000041(n), n >= 1. (End)
a(n) = A076276(n) - A006128(n-1), n >= 1. - Omar E. Pol, Oct 30 2011

A340035 Irregular triangle read by rows T(n,k) in which row n lists n blocks, where the m-th block consists of A000041(n-m) copies of the divisors of m, with 1 <= m <= n.

Original entry on oeis.org

1, 1, 1, 2, 1, 1, 1, 2, 1, 3, 1, 1, 1, 1, 2, 1, 2, 1, 3, 1, 2, 4, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 3, 1, 3, 1, 2, 4, 1, 5, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 3, 1, 3, 1, 3, 1, 2, 4, 1, 2, 4, 1, 5, 1, 2, 3, 6, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2
Offset: 1

Views

Author

Omar E. Pol, Dec 26 2020

Keywords

Comments

For further information about the correspondence divisor/part see A338156.

Examples

			Triangle begins:
  1;
  1, 1, 2;
  1, 1, 1, 2, 1, 3;
  1, 1, 1, 1, 2, 1, 2, 1, 3, 1, 2, 4;
  1, 1, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 3, 1, 3, 1, 2, 4, 1, 5;
  ...
Written as an irregular tetrahedron the first five slices are:
  1;
  --
  1,
  1, 2;
  -----
  1,
  1,
  1, 2
  1, 3;
  -----
  1,
  1,
  1,
  1, 2,
  1, 2,
  1, 3,
  1, 2, 4;
  --------
  1,
  1,
  1,
  1,
  1,
  1, 2,
  1, 2,
  1, 2,
  1, 3,
  1, 3,
  1, 2, 4,
  1, 5;
--------
The slices of the tetrahedron appear in the upper zone of the following table (formed by three zones) which shows the correspondence between divisors and parts (n = 1..5):
.
|---|---------|-----|-------|---------|-----------|-------------|
| n |         |  1  |   2   |    3    |     4     |      5      |
|---|---------|-----|-------|---------|-----------|-------------|
|   | A027750 |     |       |         |           |  1          |
|   | A027750 |     |       |         |           |  1          |
|   | A027750 |     |       |         |           |  1          |
|   | A027750 |     |       |         |           |  1          |
| D | A027750 |     |       |         |           |  1          |
| I |---------|-----|-------|---------|-----------|-------------|
| V | A027750 |     |       |         |  1        |  1 2        |
| I | A027750 |     |       |         |  1        |  1 2        |
| S | A027750 |     |       |         |  1        |  1 2        |
| O |---------|-----|-------|---------|-----------|-------------|
| R | A027750 |     |       |  1      |  1 2      |  1   3      |
| S | A027750 |     |       |  1      |  1 2      |  1   3      |
|   |---------|-----|-------|---------|-----------|-------------|
|   | A027750 |     |  1    |  1 2    |  1   3    |  1 2   4    |
|   |---------|-----|-------|---------|-----------|-------------|
|   | A027750 |  1  |  1 2  |  1   3  |  1 2   4  |  1       5  |
|---|---------|-----|-------|---------|-----------|-------------|
.
|---|---------|-----|-------|---------|-----------|-------------|
|   | A138785 |  1  |  2 2  |  4 2 3  |  7 6 3 4  | 12 8 6 4 5  |
|   |         |  =  |  = =  |  = = =  |  = = = =  |  = = = = =  |
| L | A002260 |  1  |  1 2  |  1 2 3  |  1 2 3 4  |  1 2 3 4 5  |
| I |         |  *  |  * *  |  * * *  |  * * * *  |  * * * * *  |
| N | A066633 |  1  |  2 1  |  4 1 1  |  7 3 1 1  | 12 4 2 1 1  |
| K |         |  |  |  |\|  |  |\|\|  |  |\|\|\|  |  |\|\|\|\|  |
|   | A181187 |  1  |  3 1  |  6 2 1  | 12 5 2 1  | 20 8 4 2 1  |
|---|---------|-----|-------|---------|-----------|-------------|
.
|---|---------|-----|-------|---------|-----------|-------------|
| P |         |  1  |  1 1  |  1 1 1  |  1 1 1 1  |  1 1 1 1 1  |
| A |         |     |  2    |  2 1    |  2 1 1    |  2 1 1 1    |
| R |         |     |       |  3      |  3 1      |  3 1 1      |
| T |         |     |       |         |  2 2      |  2 2 1      |
| I |         |     |       |         |  4        |  4 1        |
| T |         |     |       |         |           |  3 2        |
| I |         |     |       |         |           |  5          |
| O |         |     |       |         |           |             |
| N |         |     |       |         |           |             |
| S |         |     |       |         |           |             |
|---|---------|-----|-------|---------|-----------|-------------|
.
The table is essentially the same table of A340032 but here, in the upper zone, every row is A027750 instead of A127093.
Also the above table is the table of A338156 upside down.
The connection with the tower described in A221529 is as follows (n = 7):
|--------|------------------------|
| Level  |                        |
| in the | 7th slice of divisors  |
| tower  |                        |
|--------|------------------------|
|  11    |   1,                   |
|  10    |   1,                   |
|   9    |   1,                   |
|   8    |   1,                   |
|   7    |   1,                   |
|   6    |   1,                   |
|   5    |   1,                   |
|   4    |   1,                   |
|   3    |   1,                   |
|   2    |   1,                   |
|   1    |   1,                   |
|--------|------------------------|
|   7    |   1, 2,                |
|   6    |   1, 2,                |
|   5    |   1, 2,                |
|   4    |   1, 2,                |
|   3    |   1, 2,                |
|   2    |   1, 2,                |
|   1    |   1, 2,                |
|--------|------------------------|
|   5    |   1,    3,             |
|   4    |   1,    3,             |
|   3    |   1,    3,             |
|   2    |   1,    3,             |      Level
|   1    |   1,    3,             |             _
|--------|------------------------|       11   | |
|   3    |   1, 2,    4,          |       10   | |
|   2    |   1, 2,    4,          |        9   | |
|   1    |   1, 2,    4,          |        8   |_|_
|--------|------------------------|        7   |   |
|   2    |   1,          5,       |        6   |_ _|_
|   1    |   1,          5,       |        5   |   | |
|--------|------------------------|        4   |_ _|_|_
|   1    |   1, 2, 3,       6,    |        3   |_ _ _| |_
|--------|------------------------|        2   |_ _ _|_ _|_ _
|   1    |   1,                7; |        1   |_ _ _ _|_|_ _|
|--------|------------------------|
             Figure 1.                            Figure 2.
                                                Lateral view
                                                of the tower.
.
                                                _ _ _ _ _ _ _
                                               |_| | | | |   |
                                               |_ _|_| | |   |
                                               |_ _|  _|_|   |
                                               |_ _ _|    _ _|
                                               |_ _ _|  _|
                                               |       |
                                               |_ _ _ _|
.
                                                  Figure 3.
                                                  Top view
                                                of the tower.
.
Figure 1 shows the terms of the 7th row of the triangle arranged as the 7th slice of the tetrahedron. The left hand column (see figure 1) gives the level of the sum of the divisors in the tower (see figures 2 and 3).
		

Crossrefs

Programs

  • Mathematica
    A340035row[n_]:=Flatten[Array[ConstantArray[Divisors[#],PartitionsP[n-#]]&,n]];
    nrows=7;Array[A340035row,nrows] (* Paolo Xausa, Jun 20 2022 *)

A138135 Number of parts > 1 in the last section of the set of partitions of n.

Original entry on oeis.org

0, 1, 1, 3, 3, 8, 8, 17, 20, 34, 41, 68, 80, 123, 153, 219, 271, 382, 469, 642, 795, 1055, 1305, 1713, 2102, 2713, 3336, 4241, 5190, 6545, 7968, 9950, 12090, 14953, 18104, 22255, 26821, 32752, 39371, 47774, 57220, 69104
Offset: 1

Views

Author

Omar E. Pol, Mar 30 2008

Keywords

Comments

Also first differences of A096541. For more information see A135010.

Crossrefs

Zero together with the column k=2 of A207031.

Programs

  • Maple
    b:= proc(n, i) option remember; local f, g;
          if n=0 or i=1 then [1, 0]
        else f:= b(n, i-1); g:= `if`(i>n, [0, 0], b(n-i, i));
             [f[1]+g[1], f[2]+g[2]+`if`(i>1, g[1], 0)]
          fi
        end:
    a:= n-> b(n, n)[2]-b(n-1, n-1)[2]:
    seq (a(n), n=1..60); # Alois P. Heinz, Apr 04 2012
  • Mathematica
    a[n_] := DivisorSigma[0, n] - 1 + Sum[(DivisorSigma[0, k] - 1)*(PartitionsP[n - k] - PartitionsP[n - k - 1]), {k, 1, n - 1}]; Table[a[n], {n, 1, 42}] (* Jean-François Alcover, Jan 14 2013, from 1st formula *)
    Table[Length@Flatten@Select[IntegerPartitions[n], FreeQ[#, 1] &], {n, 1, 42}]  (* Robert Price, May 01 2020 *)
  • PARI
    a(n)=numdiv(n)-1+sum(k=1,n-1,(numdiv(k)-1)*(numbpart(n-k) - numbpart(n-k-1))) \\ Charles R Greathouse IV, Jan 14 2013

Formula

a(n) = A096541(n)-A096541(n-1) = A138137(n)-A000041(n-1) = A006128(n)-A006128(n-1)-A000041(n-1).
a(n) ~ exp(Pi*sqrt(2*n/3))*(2*gamma - 2 + log(6*n/Pi^2))/(8*sqrt(3)*n), where gamma is the Euler-Mascheroni constant A001620. - Vaclav Kotesovec, Oct 24 2016
G.f.: Sum_{k>=1} x^(2*k)/(1 - x^k) / Product_{j>=2} (1 - x^j). - Ilya Gutkovskiy, Mar 05 2021

A182712 Number of 2's in the last section of the set of partitions of n.

Original entry on oeis.org

0, 0, 1, 0, 2, 1, 4, 3, 8, 7, 15, 15, 27, 29, 48, 53, 82, 94, 137, 160, 225, 265, 362, 430, 572, 683, 892, 1066, 1370, 1640, 2078, 2487, 3117, 3725, 4624, 5519, 6791, 8092, 9885, 11752, 14263, 16922, 20416, 24167, 29007, 34254, 40921, 48213, 57345, 67409
Offset: 0

Views

Author

Omar E. Pol, Nov 28 2010

Keywords

Comments

Essentially the same as A087787 but here a(n) is the number of 2's in the last section of n, not n-2. See also A100818.
Note that a(1)..a(11) coincide with a(2)..a(12) of A005291.
Also number of 2's in all partitions of n that do not contain 1's as a part, if n >= 1. Also 0 together with the first differences of A024786. - Omar E. Pol, Nov 13 2011
Also number of 2's in the n-th section of the set of partitions of any integer >= n. For the definition of "section" see A135010. - Omar E. Pol, Dec 01 2013

Examples

			a(6) = 4 counts the 2's in 6 = 4+2 = 2+2+2. The 2's in 6 = 3+2+1 = 2+2+1+1 = 2+1+1+1+1 do not count. - _Omar E. Pol_, Nov 13 2011
From _Omar E. Pol_, Oct 27 2012: (Start)
----------------------------------
Last section               Number
of the set of                of
partitions of 6             2's
----------------------------------
6 .......................... 0
3 + 3 ...................... 0
4 + 2 ...................... 1
2 + 2 + 2 .................. 3
.   1 ...................... 0
.       1 .................. 0
.       1 .................. 0
.           1 .............. 0
.           1 .............. 0
.               1 .......... 0
.                   1 ...... 0
---------------------------------
.   8 - 4 =                  4
.
In the last section of the set of partitions of 6 the difference between the sum of the second column and the sum of the third column is 8 - 4 = 4, the same as the number of 2's, so a(6) = 4 (see also A024786).
(End)
		

Crossrefs

Programs

  • Mathematica
    Table[Count[Flatten@Cases[IntegerPartitions[n], x_ /; Last[x] != 1], 2], {n, 0, 49}] (* Robert Price, May 15 2020 *)
  • Sage
    A182712 = lambda n: sum(list(p).count(2) for p in Partitions(n) if 1 not in p) # Omar E. Pol, Nov 13 2011

Formula

It appears that A000041(n) = a(n+1) + a(n+2), n >= 0. - Omar E. Pol, Feb 04 2012
G.f.: (x^2/(1 + x))*Product_{k>=1} 1/(1 - x^k). - Ilya Gutkovskiy, Jan 03 2017
a(n) ~ exp(Pi*sqrt(2*n/3)) / (8*sqrt(3)*n). - Vaclav Kotesovec, Jun 02 2018
Previous Showing 11-20 of 195 results. Next