A037897 (Greatest base 3 digit of n)-(least base 3 digit of n).

0, 0, 1, 0, 1, 2, 1, 0, 1, 1, 2, 1, 0, 1, 2, 1, 1, 2, 2, 2, 2, 1, 1, 2, 1, 0, 1, 1, 2, 1, 1, 2, 2, 2, 2, 1, 1, 2, 1, 0, 1, 2, 1, 1, 2, 2, 2, 2, 1, 1, 2, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 2, 1, 1, 2, 2, 2, 2, 1, 1, 2, 1, 0, 1, 1, 2, 1, 1, 2, 2, 2, 2, 1, 1, 2, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2

Offset

1,6

Links

Antti Karttunen, Table of n, a(n) for n = 1..19683

Formula

a(n) = A190592(n) - A290825(n). - Antti Karttunen, Aug 12 2017

Maple

A037897 := proc(n)
    local dgs ;
    dgs := convert(n, base, 3);
    max(op(dgs))-min(op(dgs)) ;
end proc: # R. J. Mathar, Oct 19 2015

Prog

(PARI) A037897(n) = (vecmax(digits(n, 3)) - vecmin(digits(n, 3))); \\ Antti Karttunen, Aug 11 2017

Crossrefs

Cf. A007089, A043530, A190592, A290825.

Sequence in context: A109294 A132966 A376004 * A190248 A054070 A293461

Adjacent sequences: A037894 A037895 A037896 * A037898 A037899 A037900

Keyword

nonn,base

Author

Clark Kimberling

Extensions

Offset corrected by R. J. Mathar, Oct 19 2015

More terms from Antti Karttunen, Aug 11 2017

Status

approved