A383850 - OEIS

%I #7 May 14 2025 14:09:22

%S 0,1,3,7,10,15,31,63,127,153,170,204,255,292,365,438,511,1023,2047,

%T 2275,2405,2470,2665,2730,2860,3185,3250,3380,3640,4095,8191,16383,

%U 32767,34695,34952,35723,36237,36494,37779,38293,38550,39321,39578,40092,41891,42405,42662,43433,43690

%N Fixed points of A383848 and A383849.

%t A383850Q[k_] := # == RotateLeft[#, Total[#]]& [IntegerDigits[k, 2]];

%t Select[Range[0, 50000], A383850Q]

%Y Cf. A383848, A383849.

%Y A000225 is a subsequence.

%K nonn,base

%O 1,3

%A _Paolo Xausa_, May 13 2025