A046922 Number of ways to express n as p+2a^2; p prime, a >= 0.

0, 1, 1, 1, 2, 0, 2, 0, 1, 1, 2, 0, 3, 0, 2, 0, 1, 0, 3, 1, 3, 0, 2, 0, 3, 0, 1, 0, 2, 0, 4, 0, 1, 1, 2, 0, 4, 0, 3, 0, 2, 0, 3, 0, 3, 0, 2, 0, 4, 0, 2, 1, 2, 0, 5, 0, 1, 0, 2, 0, 6, 0, 3, 0, 1, 0, 3, 0, 4, 0, 2, 0, 4, 1, 4, 0, 2, 0, 6, 0, 3, 0, 2, 0, 4, 0, 2, 0, 3, 0, 6, 0, 2, 0, 1, 0, 4, 0, 2

Offset: 1

Author

David W. Wilson

Keywords

• nonn

Links

• T. D. Noe, Table of n, a(n) for n=1..10000
• L. Hodges, A lesser-known Goldbach conjecture, Math. Mag., 66 (1993), 45-47.
• Index entries for sequences related to Goldbach conjecture

Crossrefs

Cf. A042978, A046920, A046921, A046923, A060003, A143539.

Cf. A010051, A001105.

Programs

Haskell

a046922 n = sum $ map (a010051 . (n -)) $ takeWhile (< n) a001105_list
-- Reinhard Zumkeller, Apr 03 2013