%I #6 Sep 30 2013 18:38:33
%S 1,3,6,10,14,16,23,27,35,37,42,45,51,57,65,70,75,81,87,94,101,105,111,
%T 119,126,133,138,147,153,156,162,168,171,177,181,189,198,204,207,214,
%U 220,231,243,248,255,264,270,277,284,286,296,309,314,316
%N (n-th 8k+3 prime plus n-th 8k+5 prime)/8.
%F a(n) = (A007520(n) + A007521(n))/8 = A022763(n)/8. - _Michel Marcus_, Sep 30 2013
%o (PARI) lista(nn) = {prm = primes(nn); tp = select(p->(Mod(p,8)==3), prm); fp = select(p->(Mod(p, 8)==5), prm); for (i = 1, min(#tp, #fp), print1((tp[i] + fp[i])/8, ", "););} \\ _Michel Marcus_, Sep 30 2013
%K nonn
%O 1,2
%A _Clark Kimberling_