OFFSET
1,1
COMMENTS
MATHEMATICA
Lc = {3, 7, 9, 13, 15, 21, 25, 31, 33, 37, 43, 49, 51, 63, 67, 69, 73, 75, 79, 87, 93, 99, 105, 111, 115, 127, 129}; Select[Union[Times @@@ Tuples[{Lc, Lc, Lc}]], # <= 9 Max[Lc] &] (* Giovanni Resta, Jun 19 2016 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, May 07 2007
EXTENSIONS
Data corrected by Giovanni Resta, Jun 19 2016
STATUS
approved