OFFSET
1,1
COMMENTS
The analog of A065206 in base 2. The number of steps starts at 0, so palindromes (cf. A006995) are excluded.
Numbers k such that A066057(k) = 1. - Andrew Howroyd, Dec 05 2024
LINKS
PROG
(ARIBAS): function b2revadd_steps(k, stop: integer); var c, n, m, steps, rev: integer; begin n := 0; c := 0; while c < stop do m := n; rev := b2reverse(m); steps := 0; while steps < k and m <> rev do m := m + rev; rev := b2reverse(m); inc(steps); end; if steps = k and m = rev then write(n, " "); inc(c); end; inc(n); end; end; b2revadd_steps(1, 66).
(PARI) isok(n, s=1)={for(k=0, s, my(r=fromdigits(Vecrev(binary(n)), 2)); if(r==n, return(k==s)); n += r); 0} \\ Andrew Howroyd, Dec 05 2024
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Klaus Brockhaus, Dec 08 2001
EXTENSIONS
Offset changed from 0 to 1 by Harry J. Smith, Feb 01 2010
STATUS
approved