A234841 Integers n such that digits in n and n^2 are in nondecreasing order.
0, 1, 2, 3, 4, 5, 6, 7, 12, 13, 15, 16, 17, 34, 35, 37, 38, 67, 116, 117, 167, 334, 335, 337, 367, 667, 1667, 3334, 3335, 3337, 3367, 3667, 6667, 16667, 33334, 33335, 33337, 33367, 33667, 36667, 66667, 166667, 333334, 333335, 333337, 333367, 333667, 336667
Offset: 1
Links
- Zak Seidov, Table of n, a(n) for n = 1..96
Programs
-
Mathematica
Select[Range[0,500000],LessEqual@@IntegerDigits[#]&&LessEqual@@IntegerDigits[#^2]&](* Ray Chandler, Jan 02 2014 *)