OFFSET
1,1
COMMENTS
These are the odd members of A154809.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
FORMULA
MATHEMATICA
npbQ[n_]:=Module[{idn2=IntegerDigits[n, 2]}, idn2!=Reverse[idn2]]; Select[ Range[1, 201, 2], npbQ] Harvey P. Dale, May 17 2012
PROG
(Haskell)
a164861 n = a164861_list !! (n-1)
a164861_list = filter ((== 0) . a178225) a005408_list
-- Reinhard Zumkeller, Oct 21 2011
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Leroy Quet, Aug 28 2009
EXTENSIONS
Extended by Ray Chandler, Mar 14 2010
STATUS
approved