OFFSET
1,1
COMMENTS
A002375(a(n)/2) = 2n-1.
LINKS
J. Stauduhar, Table of n, a(n) for n = 1..100
EXAMPLE
a(1) = 6, because 6 = {3+3} is the least m to contain one such partition.
a(2) = 22, because 22 = {3+19, 5+17, 11+11} is the least m to contain three such partitions.
a(3) = 48, because 48 = {5+43, 7+41, 11+37, 17+31, 19+29} is the least m to contain five such partitions.
MATHEMATICA
For[ls1=ls2={}; ct1=n=1, n<=1000, n++, For[ct2=i=1, i<=2n-1, i++, If[OddQ[i] && PrimeQ[i] && PrimeQ[2n-i], ct2++]]; AppendTo[ls1, Floor[ct2/2]]; While[(pos=Position[ls1, ct1, 1, 1])!={}, AppendTo[ls2, 2*pos[[1, 1]]]; ct1+=2; ]]; ls2 (* J. Stauduhar, Sep 04 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. Stauduhar, Sep 04 2012
STATUS
approved