A046401 Numbers with exactly 3 distinct palindromic prime factors.

30, 42, 66, 70, 105, 110, 154, 165, 231, 385, 606, 786, 906, 1010, 1086, 1146, 1310, 1414, 1510, 1515, 1810, 1834, 1878, 1910, 1965, 2114, 2118, 2121, 2222, 2238, 2265, 2298, 2534, 2674, 2715, 2751, 2865, 2882, 3130, 3171, 3322, 3333, 3530, 3535, 3730

Offset: 1

Author

Patrick De Geest, Jun 15 1998

Keywords

• nonn
• base

Crossrefs

Cf. A014612, A046369.

Programs

Mathematica

Select[Range[4000],PrimeOmega[#]==PrimeNu[#]==3&&AllTrue[FactorInteger[#][[All,1]],PalindromeQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 27 2019 *)