|
%I #8 Mar 29 2016 04:22:45
%S 165,195,231,255,273,455,561,645,903,1023,1105,1533,2015,2193,2289,
%T 2409,2553,2829,3171,3219,3435,3855,3999,4161,4433,4953,5285,5397,
%U 5621,5709,6141,6307,6643,7163,7239,7511,8481,9417,9705,10245,11805,12093,12291
%N Products of 3 distinct primes whose binary expansion is palindromic.
%C All terms are odd. - _Chai Wah Wu_, Mar 28 2016
%H Chai Wah Wu, <a href="/A168355/b168355.txt">Table of n, a(n) for n = 1..10000</a>
%e 165=3*5*11={1,0,1,0,0,1,0,1} 195=3*5*13={1,1,0,0,0,0,1,1}
%t f1[n_]:=Reverse[IntegerDigits[n,2]]==IntegerDigits[n,2]; f2[n_]:=Last/@FactorInteger[n]=={1,1,1} lst={};Do[If[f1[n]&&f2[n],AppendTo[lst,n]],{n,8!}];lst
%Y Cf. A016041.
%K nonn,base
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Nov 23 2009
|
