%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
