OFFSET
0,1
COMMENTS
The mentioned base 3 representation of the terms (digits 0, 1 and 2) is given in A060109. - M. F. Hasler, Jun 22 2020
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
FORMULA
EXAMPLE
a(10) = 12222022222[base 3] = 117611[base 10] since 1 is ".----" and 0 is "-----".
PROG
(Haskell)
a060110 = t . a060109 where
t 0 = 0
t n = if n == 0 then 0 else 3 * t n' + d where (n', d) = divMod n 10
-- Reinhard Zumkeller, Feb 20 2015
(PARI) apply( {A060110(n)=if(n>9, self()(n\10)*3^6)+fromdigits([1+(abs(k-n%10)>2)|k<-[3..7]], 3)}, [0..39]) \\ M. F. Hasler, Jun 23 2020
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Henry Bottomley, Feb 28 2001
STATUS
approved