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

Author

John Frye, Aug 04 2011

Keywords

• nonn
• base

Crossrefs

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

Programs

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

Sage

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