OFFSET
1,1
EXAMPLE
E.g., 92 = 2 * 2 * 23 is a term because the sets {2}, {2} and {2,3} share the digit 2.
MATHEMATICA
Select[2~Range~500, !PrimeQ@#&&And@@IntersectingQ@@@Subsets[ IntegerDigits[ First/@FactorInteger[#]], {2}]&] (* Giorgos Kalogeropoulos, May 09 2019 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Dec 15 1999
EXTENSIONS
Offset 1 from Michel Marcus, May 09 2019
Name clarified by Jon E. Schoenfield, May 10 2019
STATUS
approved