%I #15 Apr 23 2021 22:21:11
%S 1,2,3,4,91,136,200,272,540,545,609,672,705,1035,1164,1665,1681,1698,
%T 1699,1748,1818,2115,2123,2179,2323,4257,4260,4625,4626,4682,4691,
%U 4760,4802,4817,4818,4834,4880,5211,5251,5315,5324,5328,5331,5337
%N Positive numbers having the same set of digits in base 5 and base 8.
%H John Cerkan, <a href="/A037431/b037431.txt">Table of n, a(n) for n = 1..10000</a>
%e 545 is in the sequence because 545 in base 5 is 4140 and in base 8 it is 1041.
%t Select[Range[5500],Union[IntegerDigits[#,5]]==Union[IntegerDigits[#,8]]&] (* _Harvey P. Dale_, Jun 01 2018 *)
%Y Subsequence of A037395.
%K nonn,base
%O 1,2
%A _Clark Kimberling_
%E Corrected by _Don Reble_, Apr 28 2006
%E Edited by _John Cerkan_, Feb 11 2017