

A363038


The decimal digits of a(n) correspond to the Gilbreath transform of the decimal digits of n.


1



0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 10, 11, 12, 13, 14, 15, 16, 17, 18, 22, 21, 20, 21, 22, 23, 24, 25, 26, 27, 33, 32, 31, 30, 31, 32, 33, 34, 35, 36, 44, 43, 42, 41, 40, 41, 42, 43, 44, 45, 55, 54, 53, 52, 51, 50, 51, 52, 53, 54, 66, 65, 64, 63, 62, 61, 60, 61
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,3


COMMENTS

Leading zeros are ignored.
This sequence preserves the number of digits (A055642) as well as the initial digit (A000030).


LINKS



EXAMPLE

For n = 1029: the Gilbreath transform of (1 0 2 9) is (1 1 1 4), so a(1029) = 1114.


MATHEMATICA

A363038[n_]:=Module[{d=IntegerDigits[n]}, FromDigits[Join[{First[d]}, Table[First[d=Abs[Differences[d]]], Length[d]1]]]]; Array[A363038, 200, 0] (* Paolo Xausa, May 19 2023 *)


PROG

(PARI) a(n, base = 10) = { my (d = digits(n, base), t = vector(#d)); for (i = 1, #d, t[i] = d[1]; d = vector(#d1, j, abs(d[j+1]d[j])); ); fromdigits(t, base); }


CROSSREFS



KEYWORD

nonn,base,easy


AUTHOR



STATUS

approved



