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,3

Links

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

Prog

(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

Crossrefs

Sequence in context: A161942 A370689 A247675 * A212045 A292849 A115873

Adjacent sequences: A053089 A053090 A053091 * A053093 A053094 A053095

Keyword

nonn,look

Author

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

Status

approved