%I
%S 1,4,16,17,20,64,65,68,69,80,81,84,256,257,260,261,272,273,276,277,
%T 320,321,324,325,336,337,340,1024,1025,1028,1029,1040,1041,1044,1045,
%U 1088,1089,1092,1093,1104,1105,1108,1109,1280,1281
%N Positive numbers having the same set of digits in base 2 and base 4.
%H John Cerkan, <a href="/A037409/b037409.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Range[1500],Union[IntegerDigits[#,2]]==Union[IntegerDigits[#,4]]&] (* _Harvey P. Dale_, Sep 14 2014 *)
%Y Subsequence of A000695.
%K nonn,base
%O 1,2
%A _Clark Kimberling_
