0,17

T. D. Noe, Table of n, a(n) for n = 0..1000

G.f.: Product_{k>1} (1+x^prime(k)).

(Haskell)

a024939 = p a065091_list where

p _ 0 = 1

p (k:ks) m = if m < k then 0 else p ks (m - k) + p ks m

-- Reinhard Zumkeller, Aug 05 2012

Cf. A024937.

Cf. A099773, A000586.

Sequence in context: A110102 A255472 A230198 * A024937 A143977 A115265

Adjacent sequences: A024936 A024937 A024938 * A024940 A024941 A024942

nonn

Clark Kimberling

Corrected and extended by Vladeta Jovovic, Jul 20 2003

approved