OFFSET
1,1
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Ternary.
Wikipedia, Ternary numeral system
EXAMPLE
Initial terms and their ternary representations, cf. A007089:
. 5 7 8 14 15 16 17 21 22 23 24 25 26 32 34 35 41 ..
. 12 21 22 112 120 121 122 210 211 212 220 221 222 1012 1021 1022 1112 ..
MATHEMATICA
Select[Range[200], Max[Total/@Partition[IntegerDigits[#, 3], 2, 1]]>2&] (* Harvey P. Dale, Feb 12 2016 *)
PROG
(Haskell)
a242408 n = a242408_list !! (n-1)
a242408_list = filter ((> 0) . a242400) [0..]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, May 13 2014
STATUS
approved