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.

Showing 1-3 of 3 results.

A237271 Number of parts in the symmetric representation of sigma(n).

Original entry on oeis.org

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

Views

Author

Omar E. Pol, Feb 25 2014

Keywords

Comments

The diagram of the symmetry of sigma has been via A196020 --> A236104 --> A235791 --> A237591 --> A237593.
For more information see A237270.
a(n) is also the number of terraces at n-th level (starting from the top) of the stepped pyramid described in A245092. - Omar E. Pol, Apr 20 2016
a(n) is also the number of subparts in the first layer of the symmetric representation of sigma(n). For the definion of "subpart" see A279387. - Omar E. Pol, Dec 08 2016
Note that the number of subparts in the symmetric representation of sigma(n) equals A001227(n), the number of odd divisors of n. (See the second example). - Omar E. Pol, Dec 20 2016
From Hartmut F. W. Hoft, Dec 26 2016: (Start)
Using odd prime number 3, observe that the 1's in the 3^k-th row of the irregular triangle of A237048 are at index positions
3^0 < 2*3^0 < 3^1 < 2*3^1 < ... < 2*3^((k-1)/2) < 3^(k/2) < ...
the last being 2*3^((k-1)/2) when k is odd and 3^(k/2) when k is even. Since odd and even index positions alternate, each pair (3^i, 2*3^i) specifies one part in the symmetric representation with a center part present when k is even. A straightforward count establishes that the symmetric representation of 3^k, k>=0, has k+1 parts. Since this argument is valid for any odd prime, every positive integer occurs infinitely many times in the sequence. (End)
a(n) = number of runs of consecutive nonzero terms in row n of A262045. - N. J. A. Sloane, Jan 18 2021
Indices of odd terms give A071562. Indices of even terms give A071561. - Omar E. Pol, Feb 01 2021
a(n) is also the number of prisms in the three-dimensional version of the symmetric representation of k*sigma(n) where k is the height of the prisms, with k >= 1. - Omar E. Pol, Jul 01 2021
With a(1) = 0; a(n) is also the number of parts in the symmetric representation of A001065(n), the sum of aliquot parts of n. - Omar E. Pol, Aug 04 2021
The parity of this sequence is also the characteristic function of numbers that have middle divisors. - Omar E. Pol, Sep 30 2021
a(n) is also the number of polycubes in the 3D-version of the ziggurat of order n described in A347186. - Omar E. Pol, Jun 11 2024
Conjecture 1: a(n) is the number of odd divisors of n except the "e" odd divisors described in A005279. Thus a(n) is the length of the n-th row of A379288. - Omar E. Pol, Dec 21 2024
The conjecture 1 was checked up n = 10000 by Amiram Eldar. - Omar E. Pol, Dec 22 2024
The conjecture 1 is true. For a proof see A379288. - Hartmut F. W. Hoft, Jan 21 2025
From Omar E. Pol, Jul 31 2025: (Start)
Conjecture 2: a(n) is the number of 2-dense sublists of divisors of n.
We call "2-dense sublists of divisors of n" to the maximal sublists of divisors of n whose terms increase by a factor of at most 2.
In a 2-dense sublist of divisors of n the terms are in increasing order and two adjacent terms are the same two adjacent terms in the list of divisors of n.
Example: for n = 10 the list of divisors of 10 is [1, 2, 5, 10]. There are two 2-dense sublists of divisors of 10, they are [1, 2], [5, 10], so a(10) = 2.
The conjecture 2 is essentially the same as the second conjecture in the Comments of A384149. See also Peter Munn's formula in A237270.
The indices where a(n) = 1 give A174973 (2-dense numbers). See the proof there. (End)
Conjecture 3: a(n) is the number of divisors p of n such that p is greater than twice the adjacent previous divisor of n. The divisors p give the n-th row of A379288. - Omar E. Pol, Aug 02 2025

Examples

			Illustration of initial terms (n = 1..12):
---------------------------------------------------------
n   A000203  A237270    a(n)            Diagram
---------------------------------------------------------
.                               _ _ _ _ _ _ _ _ _ _ _ _
1       1      1         1     |_| | | | | | | | | | | |
2       3      3         1     |_ _|_| | | | | | | | | |
3       4      2+2       2     |_ _|  _|_| | | | | | | |
4       7      7         1     |_ _ _|    _|_| | | | | |
5       6      3+3       2     |_ _ _|  _|  _ _|_| | | |
6      12      12        1     |_ _ _ _|  _| |  _ _|_| |
7       8      4+4       2     |_ _ _ _| |_ _|_|    _ _|
8      15      15        1     |_ _ _ _ _|  _|     |
9      13      5+3+5     3     |_ _ _ _ _| |      _|
10     18      9+9       2     |_ _ _ _ _ _|  _ _|
11     12      6+6       2     |_ _ _ _ _ _| |
12     28      28        1     |_ _ _ _ _ _ _|
...
For n = 9 the sum of divisors of 9 is 1+3+9 = A000203(9) = 13. On the other hand the 9th set of symmetric regions of the diagram is formed by three regions (or parts) with 5, 3 and 5 cells, so the total number of cells is 5+3+5 = 13, equaling the sum of divisors of 9. There are three parts: [5, 3, 5], so a(9) = 3.
From _Omar E. Pol_, Dec 21 2016: (Start)
Illustration of the diagram of subparts (n = 1..12):
---------------------------------------------------------
n   A000203  A279391  A001227           Diagram
---------------------------------------------------------
.                               _ _ _ _ _ _ _ _ _ _ _ _
1       1      1         1     |_| | | | | | | | | | | |
2       3      3         1     |_ _|_| | | | | | | | | |
3       4      2+2       2     |_ _|  _|_| | | | | | | |
4       7      7         1     |_ _ _|  _ _|_| | | | | |
5       6      3+3       2     |_ _ _| |_|  _ _|_| | | |
6      12      11+1      2     |_ _ _ _|  _| |  _ _|_| |
7       8      4+4       2     |_ _ _ _| |_ _|_|  _ _ _|
8      15      15        1     |_ _ _ _ _|  _|  _| |
9      13      5+3+5     3     |_ _ _ _ _| |  _|  _|
10     18      9+9       2     |_ _ _ _ _ _| |_ _|
11     12      6+6       2     |_ _ _ _ _ _| |
12     28      23+5      2     |_ _ _ _ _ _ _|
...
For n = 6 the symmetric representation of sigma(6) has two subparts: [11, 1], so A000203(6) = 12 and A001227(6) = 2.
For n = 12 the symmetric representation of sigma(12) has two subparts: [23, 5], so A000203(12) = 28 and A001227(12) = 2. (End)
From _Hartmut F. W. Hoft_, Dec 26 2016: (Start)
Two examples of the general argument in the Comments section:
Rows 27 in A237048 and A249223 (4 parts)
i:  1  2 3 4 5 6 7 8 9 . . 12
27: 1  1 1 0 0 1                           1's in A237048 for odd divisors
    1 27 3     9                           odd divisors represented
27: 1  0 1 1 1 0 0 1 1 1 0 1               blocks forming parts in A249223
Rows 81 in A237048 and A249223 (5 parts)
i:  1  2 3 4 5 6 7 8 9 . . 12. . . 16. . . 20. . . 24
81: 1  1 1 0 0 1 0 0 1 0 0 0                          1's in A237048 f.o.d
    1 81 3    27     9                                odd div. represented
81: 1  0 1 1 1 0 0 0 1 1 1 1 1 1 1 1 0 0 0 1 1 1 0 1  blocks fp in A249223
(End)
		

Crossrefs

Programs

  • Mathematica
    a237271[n_] := Length[a237270[n]] (* code defined in A237270 *)
    Map[a237271, Range[90]] (* data *)
    (* Hartmut F. W. Hoft, Jun 23 2014 *)
    a[n_] := Module[{d = Partition[Divisors[n], 2, 1]}, 1 + Count[d, ?(OddQ[#[[2]]] && #[[2]] >= 2*#[[1]] &)]]; Array[a, 100] (* _Amiram Eldar,  Dec 22 2024 *)
  • PARI
    fill(vcells, hga, hgb) = {ic = 1; for (i=1, #hgb, if (hga[i] < hgb[i], for (j=hga[i], hgb[i]-1, cell = vector(4); cell[1] = i - 1; cell[2] = j; vcells[ic] = cell; ic ++;););); vcells;}
    findfree(vcells) = {for (i=1, #vcells, vcelli = vcells[i]; if ((vcelli[3] == 0) && (vcelli[4] == 0), return (i));); return (0);}
    findxy(vcells, x, y) = {for (i=1, #vcells, vcelli = vcells[i]; if ((vcelli[1]==x) && (vcelli[2]==y) && (vcelli[3] == 0) && (vcelli[4] == 0), return (i));); return (0);}
    findtodo(vcells, iz) = {for (i=1, #vcells, vcelli = vcells[i]; if ((vcelli[3] == iz) && (vcelli[4] == 0), return (i)); ); return (0);}
    zcount(vcells) = {nbz = 0; for (i=1, #vcells, nbz = max(nbz, vcells[i][3]);); nbz;}
    docell(vcells, ic, iz) = {x = vcells[ic][1]; y = vcells[ic][2]; if (icdo = findxy(vcells, x-1, y), vcells[icdo][3] = iz); if (icdo = findxy(vcells, x+1, y), vcells[icdo][3] = iz); if (icdo = findxy(vcells, x, y-1), vcells[icdo][3] = iz); if (icdo = findxy(vcells, x, y+1), vcells[icdo][3] = iz); vcells[ic][4] = 1; vcells;}
    docells(vcells, ic, iz) = {vcells[ic][3] = iz; while (ic, vcells = docell(vcells, ic, iz); ic = findtodo(vcells, iz);); vcells;}
    nbzb(n, hga, hgb) = {vcells = vector(sigma(n)); vcells = fill(vcells, hga, hgb); iz = 1; while (ic = findfree(vcells), vcells = docells(vcells, ic, iz); iz++;); zcount(vcells);}
    lista(nn) = {hga = concat(heights(row237593(0), 0), 0); for (n=1, nn, hgb = heights(row237593(n), n); nbz = nbzb(n, hga, hgb); print1(nbz, ", "); hga = concat(hgb, 0););} \\ with heights() also defined in A237593; \\ Michel Marcus, Mar 28 2014
    
  • Python
    from sympy import divisors
    def a(n: int) -> int:
        divs = list(divisors(n))
        d = [divs[i:i+2] for i in range(len(divs) - 1)]
        s = sum(1 for pair in d if len(pair) == 2 and pair[1] % 2 == 1 and pair[1] >= 2 * pair[0])
        return s + 1
    print([a(n) for n in range(1, 80)])  # Peter Luschny, Aug 05 2025

Formula

a(n) = A001227(n) - A239657(n). - Omar E. Pol, Mar 23 2014
a(p^k) = k + 1, where p is an odd prime and k >= 0. - Hartmut F. W. Hoft, Dec 26 2016
Theorem: a(n) <= number of odd divisors of n (cf. A001227). The differences are in A239657. - N. J. A. Sloane, Jan 19 2021
a(n) = A340846(n) - A340833(n) + 1 (Euler's formula). - Omar E. Pol, Feb 01 2021
a(n) = A000005(n) - A243982(n). - Omar E. Pol, Aug 02 2025

A279387 Irregular triangle read by rows: suppose the symmetric representation of sigma(n) consists of m = A250068(n) layers of width 1, arranged in increasing order; then T(n,k) (n >= 1, 1 <= k <= m) is the number of subparts in the k-th layer.

Original entry on oeis.org

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

Views

Author

Omar E. Pol, Dec 12 2016

Keywords

Comments

The "subparts" of the symmetric representation of sigma(n) are defined to be the regions that arise after the dissection of the symmetric representation of sigma(n) into successive layers of width 1.
The number of layers of width 1 in the symmetric representation of sigma(n) is given in A250068.
The number of subparts in the first layer of the symmetric representation of sigma(n) is equal to A237271(n).
We can find the symmetric representation of sigma(n) as the terraces at the n-th level (starting from the top) of the stepped pyramid described in A245092.
(All above comments are essentially the same as the comments dated Nov 05 2016 at the old version of A275601, which was the same as A001227).
The sum of row n equals the number of subparts in the symmetric representation of sigma(n).
Conjecture:
The number of subparts in the symmetric representation of sigma(n) equals A001227(n), the number of odd divisors of n.
From Hartmut F. W. Hoft, Dec 16 2016: (Start)
Proof:
Each row of the irregular triangle of A262045 can be interpreted as a step function of step sizes 1, 0, and -1. The numbers in row n are the widths of the segments in the parts of the symmetric representation of sigma(n). Each new subpart in a segment (in the left half) of row n starts at the same odd index that represents an odd divisor d of n in the irregular triangle of A237048. Either a subpart ends at an even index e, representing a second odd divisor, which satisfies d * e = oddpart(n), and thus the entire subpart is duplicated in the symmetric portion of the representation, or a subpart runs through the center and continues contiguously into the right half of the symmetric portion of the representation. In other words, the number of subparts in row n equals the number of odd divisors of n, i.e., the conjecture is true. (End)

Examples

			Triangle begins (first 18 rows):
1;
1;
2;
1;
2;
1, 1;
2;
1;
3;
2;
2;
1, 1;
2;
2;
3, 1;
1;
2;
1, 2;
...
For n = 12, the 11th row of triangle A237593 is [6, 3, 1, 1, 1, 1, 3, 6] and the 12th row of the same triangle is [7, 2, 2, 1, 1, 2, 2, 7], so the diagram of the symmetric representation of sigma(12) = 28 is constructed as shown below in Figure 1:
.                          _                                    _
.                         | |                                  | |
.                         | |                                  | |
.                         | |                                  | |
.                         | |                                  | |
.                         | |                                  | |
.                    _ _ _| |                             _ _ _| |
.                  _|    _ _|                           _|  _ _ _|
.                _|     |                             _|  _| |
.               |      _|                            |  _|  _|
.               |  _ _|                              | |_ _|
.    _ _ _ _ _ _| |    28                 _ _ _ _ _ _| |    5
.   |_ _ _ _ _ _ _|                      |_ _ _ _ _ _ _|
.                                                       23
.
.   Figure 1. The symmetric            Figure 2. After the dissection
.   representation of sigma(12)        of the symmetric representation
.   has only one part which            of sigma(12) into layers of
.   contains 28 cells, so              width 1 we can see two "subparts"
.   A237271(12) = 1.                   that contain 23 and 5 cells
.                                      respectively, so the 12th row of
.                                      this triangle is [1, 1], and the
.                                      row sum is A001227(12) = 2,
.                                      equaling the number of odd divisors
.                                      of 12.
.
For n = 15, the 14th row of triangle A237593 is [8, 3, 1, 2, 2, 1, 3, 8] and the 15th row of the same triangle is [8, 3, 2, 1, 1, 1, 1, 2, 3, 8], so the diagram of the symmetric representation of sigma(15) = 24 is constructed as shown below in Figure 3:
.                                _                                  _
.                               | |                                | |
.                               | |                                | |
.                               | |                                | |
.                               | |                                | |
.                               | |                                | |
.                               | |                                | |
.                               | |                                | |
.                          _ _ _|_|                           _ _ _|_|
.                      _ _| |      8                      _ _| |      8
.                     |    _|                            |  _ _|
.                    _|  _|                             _| |_|
.                   |_ _|  8                           |_ _|  1
.                   |                                  |    7
.    _ _ _ _ _ _ _ _|                   _ _ _ _ _ _ _ _|
.   |_ _ _ _ _ _ _ _|                  |_ _ _ _ _ _ _ _|
.                    8                                  8
.
.   Figure 3. The symmetric            Figure 4. After the dissection
.   representation of sigma(15)        of the symmetric representation
.   has three parts of size 8          of sigma(15) into layers of
.   because every part contains        width 1 we can see four "subparts".
.   8 cells, so A237271(15) = 3.       The first layer has three subparts:
.                                      [8, 7, 8]. The second layer has
.                                      only one subpart of size 1, so
.                                      the 15th row of this triangle is
.                                      [3, 1], and the row sum is
.                                      A001227(15) = 4, equaling the
.                                      number of odd divisors of 15.
.
For n = 360, the 359th row of triangle A237593 is [180, 61, 30, 19, 12, 9, 7, 6, 4, 4, 3, 3, 2, 3, 2, 1, 2, 2, 1, 1, 2, 1, 1, 1, 1, 1] and the 360th row of the same triangle is [181, 60, 31, 18, 13, 9, 7, 5, 5, 4, 3, 2, 2, 2, 2, 2, 2, 1, 1, 2, 1, 1, 1, 1, 1], so have that the symmetric representation of sigma(360) = 1170 has only one part, five layers, and six subparts: [(719), (237), (139), (71), (2, 2)], so the 360th row of this triangle is [1, 1, 1, 1, 2], and the row sum is A001227(360) = 6, equaling the number of odd divisors of 360 (the diagram is too large to include).
From _Hartmut F. W. Hoft_, Dec 16 2016: (Start)
45 has 6 subparts of which 2 have symmetric duplicates and 2 span the center. Row length is 18 and "|" indicates the center marker for a row.
1 2 3 4 5 6 7 8 9|9 8 7 6 5 4 3 2 1  : position indices
1 0 1 1 2 1 1 1 2|2 1 1 1 2 1 1 0 1  : row 45 of A262045
1   1 1 1 1 1 1 1|1 1 1 1 1 1 1   1  : layer 1
        1       1|1       1          : layer 2
1 1 1 0 1 1 0 0 1|                   : row 45 of A237048 (odd divisors)
+ - + . + - . . +|                   : change in level ("." no change)
90 has 6 subparts and 3 layers (row length is 24).
1 2 3 4 5 6 7 8..10..12|.14..16..18..20..22..24 : position indices
1 1 2 1 2 2 2 2 3 3 3 2|2 3 3 3 2 2 2 2 1 2 1 1 : row 90 of A262045
1 1 1 1 1 1 1 1 1 1 1 1|1 1 1 1 1 1 1 1 1 1 1 1 : layer 1
    1   1 1 1 1 1 1 1 1|1 1 1 1 1 1 1 1   1     : layer 2
                1 1 1  |  1 1 1                 : layer 3
1 0 1 1 1 0 0 0 1 0 0 1|                        : row 90 of A237048
+ . + - + . . . + . . -|                        : change in level ("." no change)
The process of successive levels provides two "default" dissections of the symmetric representation into subparts from the boundary at n towards the boundary at n-1 or in the reverse direction. (End)
From _Omar E. Pol_, Nov 24 2020: (Start)
For n = 18 we have that the 17th row of triangle A237593 is [9, 4, 2, 1, 1, 1, 1, 2, 4, 9] and the 18th row of the same triangle is [10, 3, 2, 2, 1, 1, 2, 2, 3, 10], so the diagram of the symmetric representation of sigma(18) = 39 is constructed as shown below in Figure 5:
.                                     _                                      _
.                                    | |                                    | |
.                                    | |                                    | |
._                                   | |                                    | |
.                                    | |                                    | |
.                                    | |                                    | |
.                                    | |                                    | |
.                                    | |                                    | |
.                                    | |                                    | |
.                             _ _ _ _| |                             _ _ _ _| |
.                            |    _ _ _|                            |  _ _ _ _|
.                           _|   |                                 _| | |
.                         _|  _ _|                               _|  _|_|
.                     _ _|  _|                               _ _|  _|    2
.                    |     |  39                            |  _ _|
.                    |  _ _|                                | |_ _|
.                    | |                                    | |    2
.   _ _ _ _ _ _ _ _ _| |                   _ _ _ _ _ _ _ _ _| |
.  |_ _ _ _ _ _ _ _ _ _|                  |_ _ _ _ _ _ _ _ _ _|
.                                                              35
.
.   Figure 5. The symmetric               Figure 6. After the dissection
.   representation of sigma(18)           of the symmetric representation
.   has one part of size 39, so           of sigma(18) into layers of
.   A237271(18) = 1.                      width 1 we can see three "subparts".
.                                         The first layer has one subpart of
.                                         size 35. The second layer has
.                                         two subparts of size 2, so
.                                         the 18th row of this triangle is
.                                         [1, 2], and the row sum is
.                                         A001227(18) = 3.
(End)
		

Crossrefs

The sum of row n equals A001227(n).
Hence, if n is odd, the sum of row n equals A000005(n).
Row n has length A250068(n).
Column 1 gives A237271.
For more information about "subparts" see A279388 and A279391.

Programs

  • Mathematica
    (* function a341969[ ] is defined in A341969 *)
    a279387[n_] := Module[{widthL=a341969[n], partL, cL, top, ft, sL}, partL=Select[SplitBy[widthL, #==0&], #!={0}&]; cL=Table[0, Max[widthL]]; While[partL!={}, top=Last[partL]; ft=First[top]; sL=Select[SplitBy[top, #==ft&], #!={ft}&];
    cL[[ft]]++; partL=Join[Most[partL], sL]]; cL]
    Flatten[a279387[74]] (* the first 74 rows of the table; Hartmut F. W. Hoft, Feb 24 2021 *)

Extensions

Definition edited by Omar E. Pol and N. J. A. Sloane, Nov 25 2020

A244579 Numbers k with the property that the number of parts in the symmetric representation of sigma(k) equals the number of divisors of k.

Original entry on oeis.org

1, 3, 5, 7, 9, 11, 13, 17, 19, 21, 23, 25, 27, 29, 31, 33, 37, 39, 41, 43, 47, 49, 51, 53, 55, 57, 59, 61, 65, 67, 69, 71, 73, 79, 81, 83, 85, 87, 89, 93, 95, 97, 101, 103, 107, 109, 111, 113, 115, 119, 121, 123, 125, 127, 129, 131, 133, 137, 139, 141, 145
Offset: 1

Views

Author

Omar E. Pol, Jul 02 2014

Keywords

Comments

Numbers n such that A243982(n) = 0.
First differs from A151991 at a(25).
Let n = 2^m * q with m >= 0 and q odd. Let c_n denote the count of regions in the symmetric representation of sigma(n), which is determined by the positions of 1's in the n-th row of A237048. The maximum of c_n occurs when odd and even positions of 1's alternate implying that all regions have width 1, denoted by w_n = 1. When m > 0 then sigma_0(n) > sigma_0(q) and c_n = sigma_0(n) is impossible. Therefore, exactly those odd n with w_n = 1 are in this sequence. Furthermore, since the 1's in A237048 represent the odd divisors of n, their odd-even alternation expresses the property 2*f < g for any two adjacent divisors f < g of odd number n; in other words, this sequence is also the complement of A090196 relative to the odd numbers. This last property permits computations of elements in this sequence faster than with function a244579, which is based on Dyck paths. - Hartmut F. W. Hoft, Oct 11 2015
From Hartmut F. W. Hoft, Dec 06 2016: (Start)
Also, integers n such that for any pair a < b of divisors of n the inequality 2*a < b holds (hence n is odd).
Let 1 = d_1 < ... < d_k = n be all (odd) divisors of n. The property 2*d_i < d_(i+1), for 1 <= i < k, is equivalent for the 1's in the n-th row of A249223 to be in positions 1 = d_1 < 2 < d_2 < 2*d_2 < ... < d_i <2*d_i < d_(i+1) < ... where 2*d_i represents the odd divisor e_i with d_i * e_i = n. In other words, the odd divisors are the number of parts in the symmetric representation of sigma(n). The rightmost 1 in the n-th row occurs in an odd (even) position when k is odd (even).
As a consequence this sequence is also the complement of A090196 in the set of odd numbers. (End)

Examples

			9 is in the sequence because the parts of the symmetric representation of sigma(9) are [5, 3, 5] and the divisors of 9 are [1, 3, 9] and in both cases there is the same number of elements: A237271(9) = A000005(9) = 3.
See the link for a diagram of the symmetric representations of sigma for sequence data listed above. The symmetric representations of sigma(a(35)) = sigma(81) = sigma(3^4) consists of 5 regions whose areas are [41, 15, 9, 15, 41] and computed as 41 = (3^4+3^0)/2, 15 = (3^3+3^1)/2, and 9 = 3^2 for the central area. Observe also that the 81st row in triangle A237048 is [ 1 1 1 0 0 1 0 0 1 0 0 0 ] with the 1's in positions 1, 2, 3, 6, and 9. This is the largest count for the symmetric regions of sigma shown in the diagram. - _Hartmut F. W. Hoft_, Oct 11 2015
		

Crossrefs

Programs

  • Mathematica
    (* Function a237270[] is defined in A237270 *)
    a244579[m_, n_] := Select[Range[m,n], Length[a237270[#]] == Length[Divisors[#]]&]
    a244579[1, 150] (* data *)
    (* Hartmut F. W. Hoft, Sep 19 2014 *)
    (* alternative function using the divisor property *)
    divisorPairsQ[n_] := Module[{d=Divisors[n]}, Select[2*Most[d] - Rest[d], # >= 0&] == {}]
    a244579Alt[m_?OddQ, n_] := Select[Range[m, n, 2], divisorPairsQ]
    a244579Alt[1, 145] (* data *)
    (* Hartmut F. W. Hoft, Oct 11 2015 *)

Formula

A237271(a(k)) = A000005(a(k)).
Showing 1-3 of 3 results.