A040114 List of absolute values of differences between digits of 10, 11, 12, ..., listed digit by digit.
1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 2, 1, 0, 1, 2, 3, 4, 5, 6, 7, 3, 2, 1, 0, 1, 2, 3, 4, 5, 6, 4, 3, 2, 1, 0, 1, 2, 3, 4, 5, 5, 4, 3, 2, 1, 0, 1, 2, 3, 4, 6, 5, 4, 3, 2, 1, 0, 1, 2, 3, 7, 6, 5, 4, 3, 2, 1, 0, 1, 2, 8, 7, 6, 5, 4, 3, 2, 1, 0, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, 1, 0, 1, 1, 1, 2, 1, 3, 1, 4, 1, 5
Offset: 10
Examples
From _M. F. Hasler_, Nov 09 2019: (Start) The first term is the difference between digits of 10, which is 1. The second term is the difference between digits of 11, which is 0. The 100th term is the difference between the first two digits of 100, 1-0 = 1. The 101st term is the difference between the last two digits of 100, 0-0 = 0. The 120th term is the difference between the first two digits of 110, 1-1 = 0: Here "leading zeros" are preserved, in contrast to A040115 where all digit-wise differences of any n are concatenated to one term, and leading zeros disappear. (End) When we reach n = 371, for example, we append 4 and 6 to the sequence.
Links
- T. D. Noe, Table of n, a(n) for n = 10..1902
Programs
-
Mathematica
Flatten[Table[Abs[Differences[IntegerDigits[n]]],{n,10,200}]] (* Harvey P. Dale, Jun 28 2021 *)
Extensions
Definition clarified by N. J. A. Sloane, Aug 19 2008.
Name edited by M. F. Hasler, Nov 09 2019
Comments