OFFSET
1,1
COMMENTS
LINKS
Reinhard Zumkeller and Chai Wah Wu, Table of n, a(n) for n = 1..9998 First 998 terms from Reinhard Zumkeller.
FORMULA
a(n) < 10^n / (0.45 n). - Charles R Greathouse IV, Jan 09 2012
a(n) <= A216812(n) <= 2(10^n - 1)/9. - N. J. A. Sloane, Sep 18 2012
MATHEMATICA
Module[{m=Rest[FromDigits/@Tuples[{0, 2}, 12]]}, Table[Select[m, Divisible[ #, n]&, 1], {n, 40}]]//Flatten (* Harvey P. Dale, Jul 31 2017 *)
PROG
(Haskell)
a078241 n = head [x | x <- tail a169965_list, mod x n == 0]
-- Reinhard Zumkeller, Jan 10 2012
(Python)
def A078241(n):
if n > 0:
for i in range(1, 2**n):
x = 2*int(bin(i)[2:])
if not x % n:
return x
return 0 # Chai Wah Wu, Dec 30 2014
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 23 2002
EXTENSIONS
More terms from Ray Chandler, Jul 12 2004
STATUS
approved