A273402 Squarefree numbers n such that n is divisible by the product of digits of prime(n).

5, 6, 7, 21, 30, 105, 190, 318, 462, 1974, 1995, 3390, 10546, 26886, 86618, 733533, 3624222, 6363183, 13767810, 17334030, 37290610, 56196114, 56196174, 56198055, 56225085, 56388130, 56676030, 60985974, 84686126

Offset: 1

Author

K. D. Bajpai, May 21 2016

Keywords

• nonn
• base

Examples

			30 is in the sequence because 30 = 2*3*5 that is squarefree; prime(30) = 113; 1*1*3 = 3 that divides 30.
105 is in the sequence because 105 = 3*5*7 that is squarefree; prime(105) = 571; 5*7*1 = 35 that divides 105.
		

Crossrefs

Cf. A005117, A005349, A007602, A038186, A053666, A013929.

Programs

Mathematica

A273402 = {}; Do[p = Prime[n]; k = Times @@ IntegerDigits[p]; If[k > 0 && Divisible[n, k] && SquareFreeQ[n], AppendTo[A273402, n]], {n, 1, 10^8}]; A273402