A060810 Numbers whose squares have their digits in strictly increasing order.
0, 1, 2, 3, 4, 5, 6, 7, 13, 16, 17, 37, 116, 117, 367
Offset: 1
Examples
117^2 = 13689 and 1 < 3 < 6 < 8 < 9.
Crossrefs
Cf. A122683.
Programs
-
Mathematica
Select[Range[0,400],Min[Differences[IntegerDigits[#^2]]]>0&] (* Harvey P. Dale, Oct 06 2024 *)
Formula
a(n) = sqrt(A122683(n)).