OFFSET
0,3
COMMENTS
LINKS
Rémy Sigrist, Table of n, a(n) for n = 0..8192
FORMULA
a(n) <= n + 1.
PROG
(PARI) { base = 2; k = 0; r = 0; for (n=0, 67, while (r<n, r = fromdigits(Vecrev(digits(k++, base)), base); ); print1 (k ", ")) }
(Python)
def A340836(n):
if n == 0:
return 0
s = bin(n)[2:]
i = s.find('0')
if i == -1:
return n
s1, s2 = s[:i+1], s[i+1:]
if s2 == '':
return n+1
if int(s2) <= 1:
return int('1'+s2[-2::-1]+s1[::-1], 2)
else:
return int('1'+'0'*(len(s2)-1)+bin(int(s1, 2)+1)[:1:-1], 2) # Chai Wah Wu, Mar 14 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Mar 13 2021
STATUS
approved