A099620 Greatest multiple of the n-th prime in A098962.

6, 15, 35, 119, 407, 559, 1037, 1387, 2231, 3683, 4247, 6179, 7913, 8557, 10951, 14257, 18113, 19093, 24053, 27193, 28981, 34681, 38263, 44411, 54611, 59893, 61903, 66233, 69869, 74467, 96139, 104407, 113573, 119123, 138421, 142091

Offset: 1

Author

Reinhard Zumkeller, Oct 26 2004

Keywords

• nonn

Links

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

Crossrefs

Cf. A099619.

Programs

Haskell

a099620 n = f (p - 1) $ drop (a099619 n) a098962_list where
   f c (x:xs) | c == 1 = if m == 0 then x else f 1 xs
              | m /= 0 = f c xs
              | m == 0 = f (c - if x' == p then 2 else 1) xs
              where (x',m) = divMod x p
   p = a000040 n
-- Reinhard Zumkeller, Feb 18 2013