A342592 Irregular triangle read by rows in which row n lists the next width pattern not yet encountered as n increases in the symmetric representation of sigma(n), where each contiguous sequence of identical widths w in A249223 is replaced by a single entry of w (see A341969).
1, 1, 0, 1, 1, 2, 1, 1, 0, 1, 0, 1, 1, 0, 1, 2, 1, 0, 1, 1, 2, 1, 2, 1, 1, 0, 1, 0, 1, 0, 1, 1, 2, 1, 2, 1, 2, 1, 1, 0, 1, 2, 1, 2, 1, 2, 1, 0, 1, 1, 2, 3, 2, 3, 2, 1, 1, 0, 1, 0, 1, 2, 1, 0, 1, 0, 1, 1, 2, 3, 2, 1, 1, 0, 1, 2, 1, 0, 1, 2, 1, 0, 1, 1, 2, 1, 0, 1, 2, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1
Offset: 1
Examples
The first 7 rows in the irregular triangle below correspond to rows 1, 3, 6, 9, 15, 18 and 21 of the triangle in A249223 of widths. Collapsing each constant section of a row to a single value in A249223 produces the left half of the corresponding row in the triangle of this sequence. Every power of 2 has the width pattern (1); every odd prime has the width pattern (1, 0, 1); the triangle in A249223 shows that 12 and 24 have the same width pattern ( 1 2 1 ) as number 6. The first 21 distinct width patterns. The smallest number whose symmetric representation of sigma has the width pattern of that row is listed in the first column. All possible symmetric Dyck path patterns of lengths 1, 3, 5 and 7 are in the triangle below; their respective counts are A001405(1,2,3,4) = (1,2,3,6). 1 1 3 1 0 1 6 1 2 1 9 1 0 1 0 1 15 1 0 1 2 1 0 1 18 1 2 1 2 1 21 1 0 1 0 1 0 1 30 1 2 1 2 1 2 1 45 1 0 1 2 1 2 1 2 1 0 1 60 1 2 3 2 3 2 1 63 1 0 1 0 1 2 1 0 1 0 1 72 1 2 3 2 1 75 1 0 1 2 1 0 1 2 1 0 1 78 1 2 1 0 1 2 1 81 1 0 1 0 1 0 1 0 1 90 1 2 1 2 3 2 3 2 1 2 1 105 1 0 1 2 1 2 1 0 1 2 1 2 1 0 1 120 1 2 3 4 3 2 1 135 1 0 1 2 1 2 1 2 1 2 1 2 1 0 1 147 1 0 1 0 1 0 1 0 1 0 1 150 1 2 1 2 1 2 1 2 1 2 1
Crossrefs
Programs
-
Mathematica
(* function a341969[ ] is defined in A341969*) a342592[n_] := Module[{listW={}, k, w}, For[k=1, k<=n, k++, w=a341969[k]; If[!MemberQ[listW, w], AppendTo[listW, w]]]; Flatten[listW]] a342592[81] (* 15 distinct patterns; the 15th is encountered at n=81 *)
Comments