A053092 2^A053087 kara n.

1, 1, 3, 1, 7, 3, 5, 1, 15, 7, 3, 11, 5, 19, 9, 1, 31, 15, 7, 13, 25, 3, 23, 11, 21, 5, 19, 37, 9, 35, 17, 1, 63, 31, 15, 29, 7, 27, 53, 13, 25, 49, 3, 47, 23, 45, 11, 43, 21, 41

Offset: 1

Author

Robert Lozyniak (11(AT)onna.com), Feb 27 2000

Keywords

• nonn
• look

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..1000

Programs

Haskell

a053092 n = f 1 where
   f x = case x `kara` n of
              Nothing -> f $ 2 * x
              Just y  -> y
   kara a b = if null ks then Nothing else Just $ head ks
              where ks = [c | c <- [1..a], a <= c * b, a > c * (b - 1)]
-- Reinhard Zumkeller, Mar 30 2013