login
A028821
Numbers k such that k^2 has digits in nonincreasing order.
4
0, 1, 2, 3, 8, 9, 10, 20, 21, 29, 30, 31, 80, 88, 90, 100, 200, 210, 290, 300, 310, 800, 880, 900, 1000, 2000, 2100, 2900, 2979, 3000, 3100, 3139, 8000, 8800, 9000, 10000, 20000, 21000, 29000, 29790, 30000, 31000, 31390, 31621, 80000, 88000
OFFSET
1,3
LINKS
MATHEMATICA
Select[Range[0, 10^5], GreaterEqual@@IntegerDigits[#^2]&] (* Ray Chandler, Jan 05 2014 *)
CROSSREFS
Cf. A028822.
Sequence in context: A047360 A004825 A272830 * A337261 A288740 A290150
KEYWORD
nonn,base
EXTENSIONS
Better name from Ray Chandler, Jan 05 2014
STATUS
approved