OFFSET
0,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
David Applegate, Benoit Cloitre, Philippe Deléham and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers [pdf, ps].
David Applegate, Benoit Cloitre, Philippe Deléham and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers, J. Integer Seq. 8 (2005), no. 3, Article 05.3.6, 15 pp.
O. Kullmann and X. Zhao, Bounds for variables with few occurrences in conjunctive normal forms, arXiv preprint arXiv:1408.0629 [math.CO], 2014-2017.
Ana Luzón, Manuel A. Morón, and Luis Felipe Prieto-Martínez, Commutators and commutator subgroups of the Riordan group, (2021).
FORMULA
MATHEMATICA
Join[{1}, Flatten[Table[PadRight[{}, 2^n-1, n+1], {n, 6}]]] (* Harvey P. Dale, Aug 22 2021 *)
PROG
(Haskell)
a103586 n = a070939 (n + a070939 n)
a103586_list = 1 : concat
(zipWith (replicate . fromInteger) (tail a000225_list) [2..])
-- Reinhard Zumkeller, Jul 21 2012
(Python)
def A103586(n): return (m:=n.bit_length())+(n>=(1<<m)-m) if n else 1 # Chai Wah Wu, Jun 30 2024
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Benoit Cloitre, Mar 24 2005
EXTENSIONS
a(0) = 1 added, definition and offset adjusted by Reinhard Zumkeller, Jul 21 2012
STATUS
approved