OFFSET
1,2
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
Wikipedia, Octal
MATHEMATICA
Select[Range[100], DigitCount[#, 8, 0]==0&] (* Harvey P. Dale, Jun 08 2015 *)
PROG
(Haskell)
a255805 n = a255805_list !! (n-1)
a255805_list = iterate f 1 where
f x = 1 + if r < 7 then x else 8 * f x' where (x', r) = divMod x 8
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Reinhard Zumkeller, Mar 08 2015
STATUS
editing