OFFSET
1,2
COMMENTS
By "reversal" of k's representation in binary, it is meant: write k in binary, reverse the order of its digits, and read the result as a binary value.
MAPLE
A030101 := proc(n) local bdgs; bdgs := convert(n, base, 2) ; add( op(-i, bdgs)*2^(i-1), i=1..nops(bdgs)) ; end: A161607 := proc(n) option remember ; local a; if n = 1 then 1; else for a from procname(n-1)+1 do if gcd(A030101(a), a) = 1 then RETURN(a) ; fi; od: fi; end: seq(A161607(n), n=1..100) ; # R. J. Mathar, Jul 04 2009
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Leroy Quet, Jun 14 2009
EXTENSIONS
More terms from R. J. Mathar, Jul 04 2009
STATUS
approved