A168355 Products of 3 distinct primes whose binary expansion is palindromic.
165, 195, 231, 255, 273, 455, 561, 645, 903, 1023, 1105, 1533, 2015, 2193, 2289, 2409, 2553, 2829, 3171, 3219, 3435, 3855, 3999, 4161, 4433, 4953, 5285, 5397, 5621, 5709, 6141, 6307, 6643, 7163, 7239, 7511, 8481, 9417, 9705, 10245, 11805, 12093, 12291
Offset: 1
Examples
165=3*5*11={1,0,1,0,0,1,0,1} 195=3*5*13={1,1,0,0,0,0,1,1}
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A016041.
Programs
-
Mathematica
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
Comments