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
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