OFFSET
1,3
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.
PROG
(Haskell)
a046920 n = length $ filter ((\x -> x == 1 || a010051 x == 1) . (n -)) $
takeWhile (< n) a001105_list
-- Reinhard Zumkeller, Apr 03 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved