login
A175957
Numbers that cannot be written as the sum of a prime number and a primorial number.
0
1, 2, 10, 16, 22, 26, 27, 28, 34, 36, 40, 46, 50, 51, 52, 56, 57, 58, 64, 66, 70, 76, 78, 82, 86, 87, 88, 92, 93, 94, 96, 100, 106, 112, 116, 117, 118, 120, 121, 122, 123, 124, 125, 126, 130, 134, 135, 136, 142, 144, 146, 147, 148, 149, 154, 156, 160, 162, 166, 170
OFFSET
1,2
FORMULA
{k : A175933(k)=0}. - R. J. Mathar, Nov 03 2010
MATHEMATICA
fQ[n_] := Block[{pp = Select[ FoldList[Times, 1, Prime@ Range@ 20], # <= n &]}, Last@ Union@ PrimeQ[n - pp] == False]; Select[ Range@ 170, fQ] (* Robert G. Wilson v, Nov 05 2010 *)
CROSSREFS
Sequence in context: A043429 A105041 A138632 * A307055 A060658 A239321
KEYWORD
nonn
AUTHOR
EXTENSIONS
Corrected (90 removed) and extended by R. J. Mathar and Robert G. Wilson v, Nov 03 2010
STATUS
approved