login
A161349
Positive numbers with property that the digital sum plus the product of the digits is a square.
2
2, 8, 10, 14, 40, 41, 49, 90, 94, 100, 103, 108, 111, 117, 122, 130, 133, 138, 144, 155, 166, 171, 177, 180, 183, 188, 199, 202, 207, 212, 220, 221, 229, 270, 279, 292, 297, 301, 306, 310, 313, 318, 331, 333, 360, 381, 400, 405, 414, 441, 448, 450, 484, 504
OFFSET
1,1
COMMENTS
183 is in the list because 1+8+3+(1x8x3) = 12+24 = 36 = 6^2.
LINKS
MATHEMATICA
Select[Range[600], With[{c=IntegerDigits[#]}, IntegerQ[Sqrt[Total[c]+ Times@@c]]&]] (* Harvey P. Dale, Apr 28 2012 *)
CROSSREFS
Cf. A007953.
Sequence in context: A102278 A110961 A213535 * A336176 A375709 A329952
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Jun 07 2009
STATUS
approved