login
A095927
Numbers k such that k + (largest digit of k)! is a square.
1
0, 2, 3, 30, 40, 64, 81, 105, 436, 484, 505, 729, 736, 1022, 1105, 1216, 1420, 1936, 2203, 2416, 2644, 2704, 3130, 3340, 3636, 3780, 4105, 4176, 4201, 4332, 4464, 4504, 4761, 5056, 5364, 5505, 5569, 5776, 6004, 6336, 6505, 7060, 7504, 8080, 8521, 9220
OFFSET
1,2
LINKS
EXAMPLE
64 is a term because 64 + 6! = 784 = 28^2.
MATHEMATICA
Select[Range[0, 10000], IntegerQ[Sqrt[#+Max[IntegerDigits[#]]!]]&] (* Harvey P. Dale, May 14 2013 *)
CROSSREFS
Cf. A054055.
Sequence in context: A354860 A228269 A167453 * A296248 A325506 A203431
KEYWORD
base,easy,nonn
AUTHOR
Jason Earls, Jul 12 2004
STATUS
approved