OFFSET
1,2
PROG
(PARI) isok(n) = {d = divisors(n); for (i = 2, #d - 1, if (length(Str(d[i])) == 1, return (0)); ); return (1); } \\ Michel Marcus, Jul 27 2013
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Henry Bottomley, Mar 14 2000
STATUS
approved