A235597 Squares in which each digit exceeds the previous digit by more than one.
0, 1, 4, 9, 16, 25, 36, 49, 169, 1369
Offset: 1
Examples
256 is not a term because 6-5=1.
Crossrefs
A subsequence of A122683.
Programs
-
Mathematica
Select[Range[0, 40]^2, Min[Differences[IntegerDigits[#]]]>1&] (* Vincenzo Librandi, Jan 17 2014 *)