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

Author

Clark Kimberling

Keywords

• nonn
• base

Links

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

Crossrefs

Cf. A007089, A043530, A190592, A290825.

Programs

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

PARI

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

Formula

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

Extensions

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

More terms from Antti Karttunen, Aug 11 2017