login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A073793 Replace 6^k with (-6)^k in base 6 expansion of n. 8
0, 1, 2, 3, 4, 5, -6, -5, -4, -3, -2, -1, -12, -11, -10, -9, -8, -7, -18, -17, -16, -15, -14, -13, -24, -23, -22, -21, -20, -19, -30, -29, -28, -27, -26, -25, 36, 37, 38, 39, 40, 41, 30, 31, 32, 33, 34, 35, 24, 25, 26, 27, 28, 29, 18, 19, 20, 21, 22, 23, 12, 13, 14, 15, 16, 17, 6, 7, 8, 9, 10, 11 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

COMMENTS

Base 6 representation for n (in lexicographic order) converted from base -6 to base 10.

LINKS

Table of n, a(n) for n=0..71.

MATHEMATICA

f[n_Integer, b_Integer] := Block[{l = IntegerDigits[n]}, Sum[l[[ -i]]*(-b)^(i - 1), {i, 1, Length[l]}]]; a = Table[ FromDigits[ IntegerDigits[n, 6]], {n, 0, 80}]; b = {}; Do[b = Append[b, f[a[[n]], 6]], {n, 1, 80}]; b

CROSSREFS

Cf. A007092, A073787, A053985, A065369, A073791, A073792, A073794, A073795, A073796 & A073835.

Sequence in context: A063260 A271859 A232240 * A017891 A017881 A017871

Adjacent sequences:  A073790 A073791 A073792 * A073794 A073795 A073796

KEYWORD

base,easy,sign

AUTHOR

Robert G. Wilson v, Aug 12 2002

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 18 07:22 EST 2019. Contains 329252 sequences. (Running on oeis4.)