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.

A372180 Square array read by antidiagonals upwards in which T(n,m) is the n-th number whose symmetric representation of sigma consists of m copies of unimodal pattern 121 (separated by 0's if m > 1).

Original entry on oeis.org

6, 12, 78, 20, 102, 1014, 24, 114, 1734, 12246, 28, 138, 2166, 12714, 171366, 40, 174, 3174, 13026, 501126, 1922622, 48, 186, 5046, 13182, 781926, 2057406, 28960854, 56, 222, 5766, 13494, 1679046, 2067546, 144825414, 300014754, 80, 246, 8214, 13962, 4243686, 2072382, 282275286, 300137214, 4174476774
Offset: 1

Views

Author

Hartmut F. W. Hoft, Apr 21 2024

Keywords

Comments

Every number in this sequence is even since the symmetric representation of sigma for an odd number q starts 101. Each number in column m of T(n,m) has 2*m odd divisors.
Since u(m) = 2 * 3 * 13^(m-1), m>=1, has 2m odd divisors and 1 < 3 < 4 < 4*3 < 13 < 3*13 < 4*13 < 3*4*13 < 13^2 < ..., the symmetric representation of sigma for u(m) consists of m copies of unimodal pattern 121. Therefore, every column in the table T(n,m), m>=1, contains infinitely many entries. Number u(m) is the smallest entry in the m-th column when m is prime.
In general: If m>1 then T(n,m) = 2^k * q, k>=1, q odd, has at least 4 odd divisors which satisfy
d_(2i+2) < 2^(k+1) * d_(2i+1) < 2^(k+1) * d_(2i+2) < d_(2i+3), i>=0,
with the odd divisors d_j of n in increasing order.

Examples

			a(1) = T(1,1) = 6, its symmetric representation of sigma, SRS(6), has unimodal pattern 121 and a single unit of width 2 at the diagonal.
a(3) = T(1,2) = 78, SRS(78) has unimodal pattern 1210121;
a(10) = T(1,4) = 12246, SRS(12246) has unimodal pattern 121012101210121;
both symmetric representations of sigma have width 0 at the diagonal where two parts meets.
Each number in the m-th column has 2m odd divisors. T(1,9) = 4174476774.
  -------------------------------------------------------------------------
   n\m  1    2     3     4       5         6          7          8
  -------------------------------------------------------------------------
   1|   6   78   1014  12246   171366   1922622    28960854  300014754 ...
   2|  12  102   1734  12714   501126   2057406   144825414  300137214 ...
   3|  20  114   2166  13026   781926   2067546   282275286  300235182 ...
   4|  24  138   3174  13182   1679046  2072382   888215334  300357642 ...
   5|  28  174   5046  13494   4243686  2081742  3568939926  300431118 ...
   6|  40  186   5766  13962   5541126  2091882     ...      300602562 ...
   7|  48  222   8214  14118   8487372  2097966              300651546 ...
   8|  56  246  10086  14898  11082252  2110134              300896466 ...
   9|  80  258  10092  15054  11244966  2112162              301165878 ...
  10|  88  282  11094  15366  16954566  2116218              301386306 ...
  ...
		

Crossrefs

Programs

  • Mathematica
    divQ[k_, {d1_, d2_, d3_}] := d2<2^(k+1)d1&&2^(k+1)d2
    				

Formula

T(n,1) = 2^k * p with odd prime p satisfying p < 2^(k+1), see A370205.
T(n,2) = 2^k * p * q, k > 0, p and q prime, 2 < p < 2^(k+1) < 2^(k+1) * p < q, see A370206.

A375611 Numbers k whose symmetric representation of sigma(k) has at least a part with maximum width 2.

Original entry on oeis.org

6, 12, 15, 18, 20, 24, 28, 30, 35, 36, 40, 42, 45, 48, 54, 56, 63, 66, 70, 75, 77, 78, 80, 88, 91, 96, 99, 100, 102, 104, 105, 108, 110, 112, 114, 117, 130, 132, 135, 138, 143, 150, 153, 154, 156, 160, 162, 165, 170, 174, 175, 176, 182, 186, 187, 189, 190, 192, 195, 196, 200
Offset: 1

Views

Author

Hartmut F. W. Hoft, Aug 21 2024

Keywords

Comments

Number m = 2^k * q, k >= 0 and q odd, is in this sequence precisely when for any divisor s <= A003056(m) of q there is at most one divisor t of q satisfying s < t <= min(2^(k+1) * s, A003056(m)), and at least one such pair s < t of successive odd divisors exists. Equivalently, row m of the triangle in A249223 contains at least one 2, but no number larger than 2.

Examples

			a(4) = 18 has width pattern 1 2 1 2 1 in its symmetric representation of sigma consisting of a single part, and row 18 in the triangle of A249223 is 1 1 2 1 1.
a(9) = 35 has width pattern 1 0 1 2 1 0 1 in its symmetric representation of sigma consisting of 3 parts, and row 35 in the triangle of A249223 is 1 0 0 0 1 1 2.
Irregular triangle of rows a(n) in triangle of A341970, i.e. of positions of 1's in triangle of A237048, and for the corresponding widths to the diagonal in triangle of A341969:
a(n)| row in A341970      left half of row in A341969
6   | 1   3               1   2
12  | 1   3               1   2
15  | 1   2   3   5       1   0   1   2
18  | 1   3   4           1   2   1
20  | 1   5               1   2
24  | 1   3               1   2
28  | 1   7               1   2
30  | 1   3   4   5       1   2   1   2
35  | 1   2   5   7       1   0   1   2
36  | 1   3   8           1   2   1
...
		

Crossrefs

Column 2 of A253258.
Subsequence of A005279.
Some subsequences are A352030, A370205, A370206, A370209.

Programs

  • Mathematica
    eP[n_] := If[EvenQ[n], FactorInteger[n][[1, 2]], 0]+1
    sDiv[n_] := Module[{d=Select[Divisors[n], OddQ]}, Select[Union[d, d*2^eP[n]], #<=row[n]&]]
    mW2Q[n_] := Max[FoldWhileList[#1+If[OddQ[#2], 1, -1]&, sDiv[n], #1<=2&]]==2
    a375611[m_, n_] := Select[Range[m, n], mW2Q]
    a375611[1, 200]

A376333 Numbers m whose symmetric representation of sigma(m), SRS(m), consists of widths 0, 1, and 2.

Original entry on oeis.org

15, 35, 45, 63, 70, 75, 77, 78, 91, 99, 102, 105, 110, 114, 117, 130, 135, 138, 143, 153, 154, 165, 170, 174, 175, 182, 186, 187, 189, 190, 195, 209, 221, 222, 225, 231, 238, 245, 246, 247, 255, 258, 266, 273, 282, 285, 286, 297, 299, 318, 322, 323, 325, 345, 348, 350
Offset: 1

Views

Author

Hartmut F. W. Hoft, Sep 20 2024

Keywords

Comments

Sequence a(n) is the subsequence of A375611 for which the symmetric representation of sigma(a(n)) has at least two parts. The width at the diagonal can be any of the 3 widths.
Let m = 2^k * q, k >= 0 and q odd, be a number in this sequence. Let c be the number of divisors s <= A003056(m) of q for which there is at most one divisor t of q satisfying s < t <= min( 2^(k+1) * s, A003056(m). Let w be the number of times width 2 occurs in the width pattern of m (row m in the triangle of A341960). Then c = (w + 1)/2 when the width at the diagonal is equal to 2 and c = w/2 otherwise.

Examples

			SRS(a(1)) consists of 3 parts, its width pattern is 1 0 1 2 1 0 1, and c = 1 with divisor 3.
a(6) = 75 is the smallest number in this sequence which has width  0 on the diagonal; SRS(75) has 4 parts.
a(8) = 78 is the smallest number in this sequence with width pattern 1 2 1 0 1 2 1 (see A370206 and A370209).
a(35) = 225 is the smallest number in the sequence with width 1 on the diagonal; its width pattern is 1 0 1 2 1 2 1 2 1 2 1 2 1 2 1 0 1; w = 6 and c = 3 with divisors 3, 5, and 9.
		

Crossrefs

Programs

  • Mathematica
    (* function sDiv[ ] is defined in A375611 *)
    m012Q[n_] := Union[FoldWhileList[#1+If[OddQ[#2], 1, -1]&, sDiv[n], #1<=2&]]=={0, 1, 2}
    a376333[m_, n_] := Select[Range[m, n], m012Q]
    a376333[1, 350]
Showing 1-3 of 3 results.