A122683 Squares with strictly increasing digits.

0, 1, 4, 9, 16, 25, 36, 49, 169, 256, 289, 1369, 13456, 13689, 134689

Offset: 1

Author

Tanya Khovanova, Oct 20 2006

Keywords

• base
• fini
• full
• nonn

Crossrefs

Cf. A060810, A235597.

Programs

Mathematica

Select[Range[500]^2,Min[Differences[IntegerDigits[#]]]>0&] (* Harvey P. Dale, Aug 27 2013 *)

Extensions

0 inserted by Jon E. Schoenfield, Jan 14 2014