|
|
A161347
|
|
Numbers which are equal to the product of their digits plus the sum of the cubes of their own digits.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
No terms exist beyond 952. For all k > 4999, the product of k's digits plus the sum of the cubes of k's digits is less than k. - Jon E. Schoenfield, Jun 14 2009
|
|
LINKS
|
|
|
EXAMPLE
|
31 = (3*1) + 3^3 + 1^3.
|
|
MATHEMATICA
|
pscQ[n_]:=Module[{idn=IntegerDigits[n]}, Times@@idn+Total[idn^3]==n]; Select[Range[1000], pscQ] (* Harvey P. Dale, Aug 17 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,fini,full
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|