Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #21 Oct 04 2023 10:01:38
%S 0,1,2,3,6,7,8,10,12,15,20,25,30,31,36,42,45,48,54,60,63,70,77,84,91,
%T 98,105,112,119,126,127,128,136,144,152,160,168,170,176,184,192,200,
%U 204,208,216,224,232,240,248,255,261,270,279,288,297,306,315,324,333
%N Fixed points of the binary rotations A336953 and A366139: numbers k >= 0 such that A336953(k) = A366139(k) = k.
%C If a number is a fixed point of A336953, then it's also a fixed point of A366139, and vice versa.
%C k is a term iff A302291(k)|k.
%H Paolo Xausa, <a href="/A366140/b366140.txt">Table of n, a(n) for n = 1..10000</a>
%t A366140Q[n_]:=FromDigits[RotateLeft[IntegerDigits[n,2],n],2]==n;
%t Select[Range[0,500],A366140Q]
%Y Cf. A302291, A336953, A366139.
%K nonn,base,easy
%O 1,3
%A _Paolo Xausa_, Sep 30 2023