A037841 - OEIS

A037841

a(n)=Sum{|d(i)-d(i-1)|: i=1,...,m}, where Sum{d(i)*9^i: i=0,1,...,m} is the base 9 representation of n.

0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 2, 3, 4, 5, 6, 7, 2, 1, 0, 1, 2, 3, 4, 5, 6, 3, 2, 1, 0, 1, 2, 3, 4, 5, 4, 3, 2, 1, 0, 1, 2, 3, 4, 5, 4, 3, 2, 1, 0, 1, 2, 3, 6, 5, 4, 3, 2, 1, 0, 1, 2, 7, 6, 5, 4, 3, 2, 1, 0, 1, 8, 7, 6, 5, 4, 3, 2, 1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 1

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,12

COMMENTS

This is the base-9 total variation sequence; see A297330. - Clark Kimberling, Jan 18 2017

LINKS

Clark Kimberling, Table of n, a(n) for n = 1..10000

MATHEMATICA

b = 9; z = 120; t = Table[Total@ Flatten@ Map[Abs@ Differences@ # &, Partition[IntegerDigits[n, b], 2, 1]], {n, z}] (* cf. Michael De Vlieger, A037834 *)

CROSSREFS

Cf. A297330.

Sequence in context: A255593 A037895 A037903 * A165111 A038387 A240832

Adjacent sequences: A037838 A037839 A037840 * A037842 A037843 A037844

KEYWORD

nonn,base

AUTHOR

Clark Kimberling

EXTENSIONS

Updated by Clark Kimberling, Jan 20 2018

STATUS

approved