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-7 of 7 results.

A357135 Take the k-th composition in standard order for each part k of the n-th composition in standard order; then concatenate.

Original entry on oeis.org

1, 2, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 3, 1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 3, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 2, 2, 1, 2, 1, 2, 2, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 2, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1
Offset: 0

Views

Author

Gus Wiseman, Sep 26 2022

Keywords

Comments

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			Triangle begins:
   0:
   1: 1
   2: 2
   3: 1 1
   4: 1 1
   5: 2 1
   6: 1 2
   7: 1 1 1
   8: 3
   9: 1 1 1
  10: 2 2
  11: 2 1 1
  12: 1 1 1
  13: 1 2 1
  14: 1 1 2
  15: 1 1 1 1
		

Crossrefs

See link for sequences related to standard compositions.
Row n is the A357134(n)-th composition in standard order.
The version for Heinz numbers of partitions is A357139, cf. A003963.
Row sums are A357186, differences A357187.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Join@@Table[Join@@stc/@stc[n],{n,0,30}]

Formula

Row n is the A357134(n)-th composition in standard order.

A358135 Difference of first and last parts of the n-th composition in standard order.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Oct 31 2022

Keywords

Comments

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Crossrefs

See link for sequences related to standard compositions.
The first and last parts are A065120 and A001511.
This is the first minus last part of row n of A066099.
The version for Heinz numbers of partitions is A243055.
Row sums of A358133.
The partial sums of standard compositions are A358134, adjusted A242628.
A011782 counts compositions.
A333766 and A333768 give max and min in standard compositions, diff A358138.
A351014 counts distinct runs in standard compositions.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Table[-First[stc[n]]+Last[stc[n]],{n,1,100}]

Formula

a(n) = A001511(n) - A065120(n).

A358133 Triangle read by rows whose n-th row lists the first differences of the n-th composition in standard order (row n of A066099).

Original entry on oeis.org

0, -1, 1, 0, 0, -2, 0, -1, 0, 2, 1, -1, 0, 1, 0, 0, 0, -3, -1, -2, 0, 1, 0, -1, -1, 1, -1, 0, 0, 3, 2, -2, 1, 0, 1, -1, 0, 0, 2, 0, 1, -1, 0, 0, 1, 0, 0, 0, 0, -4, -2, -3, 0, 0, -1, -1, -2, 1, -2, 0, 0, 2, 1, -2, 0, 0, 0, -1, 0, -1, 2, -1, 1, -1, -1, 0, 1, -1
Offset: 3

Views

Author

Gus Wiseman, Oct 31 2022

Keywords

Comments

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			Triangle begins (dots indicate empty rows):
   1:   .
   2:   .
   3:   0
   4:   .
   5:  -1
   6:   1
   7:   0  0
   8:   .
   9:  -2
  10:   0
  11:  -1  0
  12:   2
  13:   1 -1
  14:   0  1
  15:   0  0  0
		

Crossrefs

See link for sequences related to standard compositions.
First differences of rows of A066099.
The version for Heinz numbers of partitions is A355536, ranked by A253566.
The partial sums instead of first differences are A358134.
Row sums are A358135.
A011782 counts compositions.
A351014 counts distinct runs in standard compositions.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Table[Differences[stc[n]],{n,100}]

A357186 Take the k-th composition in standard order for each part k of the n-th composition in standard order, then add up everything.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Sep 28 2022

Keywords

Comments

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			Composition 92 in standard order is (2,1,1,3), with compositions ((2),(1),(1),(1,1)) so a(92) = 2 + 1 + 1 + 1 + 1 = 6.
		

Crossrefs

See link for sequences related to standard compositions.
This is the sum of A029837 over the n-th composition in standard order.
Vertex degrees are A133494.
The version for Heinz numbers of partitions is A325033.
Row sums of A357135.
First differences are A357187.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Table[stc/@stc[n]/.List->Plus,{n,0,100}]

Formula

a(n) = A029837(A357134(n)).

A357458 First differences of A325033 = "Sum of sums of the multiset of prime indices of each prime index of n.".

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Sep 30 2022

Keywords

Comments

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798. The multiset of multisets with MM-number n is formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. For example, the prime indices of 78 are {1,2,6}, so the multiset of multisets with MM-number 78 is {{},{1},{1,2}}.

Examples

			We have A325033(5) - A325033(4) = 2 - 0, so a(4) = 2.
		

Crossrefs

The partial sums are A325033, which has row-products A325032.
The version for standard compositions is A357187.
A000961 lists prime powers.
A003963 multiples prime indices.
A005117 lists squarefree numbers.
A056239 adds up prime indices.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Differences[Table[Plus@@Join@@primeMS/@primeMS[n],{n,100}]]

Formula

a(n) = A325033(n + 1) - A325033(n).

A358138 Difference between maximum and minimum part in the n-th composition in standard order.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Oct 31 2022

Keywords

Comments

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Crossrefs

See link for sequences related to standard compositions.
The first and last parts are A065120 and A001511, difference A358135.
This is the maximum minus minimum part in row n of A066099.
The version for Heinz numbers of partitions is A243055.
The maximum and minimum parts are A333766 and A333768.
The partial sums of standard compositions are A358134, adjusted A242628.
A011782 counts compositions.
A351014 counts distinct runs in standard compositions.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Table[Max[stc[n]]-Min[stc[n]],{n,1,100}]

Formula

a(n) = A333766(n) - A333768(n).

A358333 By concatenating the standard compositions for each part of the n-th standard composition, we get a sequence of length a(n). Row-lengths of A357135.

Original entry on oeis.org

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

Views

Author

Gus Wiseman, Nov 10 2022

Keywords

Comments

The k-th composition in standard order (graded reverse-lexicographic, A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again. This gives a bijective correspondence between nonnegative integers and integer compositions.

Examples

			Composition 92 in standard order is (2,1,1,3), with compositions ((2),(1),(1),(1,1)) so a(92) = 5.
		

Crossrefs

See link for sequences related to standard compositions (A066099).
Dominates A000120.
Row-lengths of A357135, which is ranked by A357134.
A related sequence is A358330.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Length/@Table[Join@@stc/@stc[n],{n,0,100}]

Formula

Sum of A000120 over row n of A066099.
Showing 1-7 of 7 results.