A193760 Replace 3^i with n^i in ternary representation of n.

1, 2, 3, 5, 7, 12, 15, 18, 81, 101, 123, 156, 183, 212, 255, 289, 325, 648, 723, 802, 903, 991, 1083, 1200, 1301, 1406, 19683, 21953, 24391, 27030, 29823, 32802

Offset

1,2

Links

Table of n, a(n) for n=1..32.

Maple

A193760 := proc(n) nb3 := convert(n, base, 3) ; add(op(i, nb3)*n^(i-1), i=1..nops(nb3)) ; end proc: seq(A193760(n), n=1..40) ; # R. J. Mathar, Aug 05 2011

Prog

(Sage) def A193760(n): return sum(d*n**i for i, d in enumerate(n.digits(base=3))) # D. S. McNeil, Aug 05 2011

Crossrefs

Cf. A104258 for the sequence formed by the binary rather than ternary numbers.

Sequence in context: A179781 A309370 A022438 * A113623 A308868 A361459

Adjacent sequences: A193757 A193758 A193759 * A193761 A193762 A193763

Keyword

nonn,base

Author

John Frye, Aug 04 2011

Status

approved