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.
%I A272919 #24 Feb 16 2025 08:33:34 %S A272919 1,2,3,4,7,8,10,15,16,31,32,36,42,63,64,127,128,136,170,255,256,292, %T A272919 511,512,528,682,1023,1024,2047,2048,2080,2184,2340,2730,4095,4096, %U A272919 8191,8192,8256,10922,16383,16384,16912,18724,32767,32768,32896,34952,43690,65535,65536,131071 %N A272919 Numbers of the form 2^(n-1)*(2^(n*m)-1)/(2^n-1), n >= 1, m >= 1. %C A272919 In other words, numbers whose binary representation consists of one or more repeating blocks with only one 1 in each block. %C A272919 Also, fixed points of the permutations A139706 and A139708. %C A272919 Each a(n) is a term of A064896 multiplied by some power of 2. As such, this sequence must also be a subsequence of A125121. %C A272919 Also the numbers that uniquely index a Haar graph (i.e., 5 and 6 are not in the sequence since H(5) is isomorphic to H(6)). - _Eric W. Weisstein_, Aug 19 2017 %C A272919 From _Gus Wiseman_, Apr 04 2020: (Start) %C A272919 The k-th composition in standard order (row k of 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. This sequence lists all positive integers k such that the k-th composition in standard order is constant. For example, the sequence together with the corresponding constant compositions begins: %C A272919 0: () 136: (4,4) %C A272919 1: (1) 170: (2,2,2,2) %C A272919 2: (2) 255: (1,1,1,1,1,1,1,1) %C A272919 3: (1,1) 256: (9) %C A272919 4: (3) 292: (3,3,3) %C A272919 7: (1,1,1) 511: (1,1,1,1,1,1,1,1,1) %C A272919 8: (4) 512: (10) %C A272919 10: (2,2) 528: (5,5) %C A272919 15: (1,1,1,1) 682: (2,2,2,2,2) %C A272919 16: (5) 1023: (1,1,1,1,1,1,1,1,1,1) %C A272919 31: (1,1,1,1,1) 1024: (11) %C A272919 32: (6) 2047: (1,1,1,1,1,1,1,1,1,1,1) %C A272919 36: (3,3) 2048: (12) %C A272919 42: (2,2,2) 2080: (6,6) %C A272919 63: (1,1,1,1,1,1) 2184: (4,4,4) %C A272919 64: (7) 2340: (3,3,3,3) %C A272919 127: (1,1,1,1,1,1,1) 2730: (2,2,2,2,2,2) %C A272919 128: (8) 4095: (1,1,1,1,1,1,1,1,1,1,1,1) %C A272919 (End) %H A272919 Ivan Neretin, <a href="/A272919/b272919.txt">Table of n, a(n) for n = 1..1000</a> %H A272919 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/HaarGraph.html">Haar Graph</a> %F A272919 From _Gus Wiseman_, Apr 04 2020: (Start) %F A272919 A333381(a(n)) = A027750(n). %F A272919 For n > 0, A124767(a(n)) = 1. %F A272919 If n is a power of two, A333628(a(n)) = 0, otherwise = 1. %F A272919 A333627(a(n)) is a power of 2. %F A272919 (End) %p A272919 N:= 10^6: # to get all terms <= N %p A272919 R:= select(`<=`,{seq(seq(2^(n-1)*(2^(n*m)-1)/(2^n-1), m = 1 .. ilog2(2*N)/n), n = 1..ilog2(2*N))},N): %p A272919 sort(convert(R,list)); # _Robert Israel_, May 10 2016 %t A272919 Flatten@Table[d = Reverse@Divisors[n]; 2^(d - 1)*(2^n - 1)/(2^d - 1), {n, 17}] %Y A272919 Cf. A064896, A139708. %Y A272919 Cf. A137706 (smallest number indexing a new Haar graph). %Y A272919 Compositions in standard order are A066099. %Y A272919 Strict compositions are ranked by A233564. %Y A272919 Cf. A000120, A027750, A070939, A098504, A124767, A164894, A228351, A238279. %K A272919 nonn %O A272919 1,2 %A A272919 _Ivan Neretin_, May 10 2016