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.

A371450 MM-number of the set-system with BII-number n.

Original entry on oeis.org

1, 3, 5, 15, 13, 39, 65, 195, 11, 33, 55, 165, 143, 429, 715, 2145, 29, 87, 145, 435, 377, 1131, 1885, 5655, 319, 957, 1595, 4785, 4147, 12441, 20735, 62205, 47, 141, 235, 705, 611, 1833, 3055, 9165, 517, 1551, 2585, 7755, 6721, 20163, 33605, 100815, 1363, 4089
Offset: 0

Views

Author

Gus Wiseman, Apr 02 2024

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}}.
A binary index of n is any position of a 1 in its reversed binary expansion. The binary indices of n are row n of A048793. We define the set-system with BII-number n to be obtained by taking the binary indices of each binary index of n. Every set-system (finite set of finite nonempty sets of positive integers) has a different BII-number. For example, 18 has reversed binary expansion (0,1,0,0,1), and since the binary indices of 2 and 5 are {2} and {1,3} respectively, the BII-number of {{2},{1,3}} is 18. Elements of a set-system are sometimes called edges.

Examples

			The set-system with BII-number 30 is {{2},{1,2},{3},{1,3}} with MM-number prime(3) * prime(6) * prime(5) * prime(10) = 20735.
The terms together with their prime indices and binary indices of prime indices begin:
     1 -> {}        -> {}
     3 -> {2}       -> {{1}}
     5 -> {3}       -> {{2}}
    15 -> {2,3}     -> {{1},{2}}
    13 -> {6}       -> {{1,2}}
    39 -> {2,6}     -> {{1},{1,2}}
    65 -> {3,6}     -> {{2},{1,2}}
   195 -> {2,3,6}   -> {{1},{2},{1,2}}
    11 -> {5}       -> {{3}}
    33 -> {2,5}     -> {{1},{3}}
    55 -> {3,5}     -> {{2},{3}}
   165 -> {2,3,5}   -> {{1},{2},{3}}
   143 -> {5,6}     -> {{1,2},{3}}
   429 -> {2,5,6}   -> {{1},{1,2},{3}}
   715 -> {3,5,6}   -> {{2},{1,2},{3}}
  2145 -> {2,3,5,6} -> {{1},{2},{1,2},{3}}
		

Crossrefs

The sorted version is A329629, with empties A302494.
A019565 gives Heinz number of binary indices.
A048793 lists binary indices, reverse A272020, length A000120, sum A029931.
A070939 gives length of binary expansion.
A112798 lists prime indices, reverse A296150, length A001222, sum A056239.
A326753 counts connected components for BII-numbers, ones A326749.

Programs

  • Mathematica
    bix[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1];
    Table[Times@@Prime/@(Times@@Prime/@#&/@bix/@bix[n]),{n,0,30}]