|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|