OFFSET
1,2
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..10000
EXAMPLE
13 is a term as p = 1*3 = 3 and 13 = 3^2 + 2^2.
281 is a term as p = 2*8*1 = 16 and 281 = 16^2 + 5^2.
118372 is a term as p = 1*1*8*3*7*2 = 336 and 118372 = 336^2 + 74^2.
PROG
(PARI) isok(m) = my(p=vecprod(digits(m))); p && issquare(m - p^2); \\ Michel Marcus, May 06 2020
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Scott R. Shannon, May 06 2020
STATUS
approved