OFFSET
1,3
COMMENTS
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000
MATHEMATICA
A366140Q[n_]:=FromDigits[RotateLeft[IntegerDigits[n, 2], n], 2]==n;
Select[Range[0, 500], A366140Q]
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Paolo Xausa, Sep 30 2023
STATUS
approved