%I
%S 2,2,3,5,5,7,7,11,11,13,17,17,19,23,23,29,29,31,31,37,37,41,41,43,47,
%T 47,53,53,59,59,61,67,71,71,73,73,79,83,83,89,89,97,97,101,101,103,
%U 103,107,107,109,109,113,113,127,127,131,131,137,137,149,149,151,151,149,151,157,163,163,167,167,173,173,179,179
%N a(n) is the arithmetic mean of the first n terms in A073883.
%C By definition of A073883, each term is prime.
%C Are all the primes reached?
%e A073883 starts: 1, 3, 2, 6, 13, 5, 19, 7, 43, 11, 33, 61, ...
%e So a(2) = (1+3)/2 = 2, a(3) = (1+3+2)/3 = 2, a(4) = (1+3+2+6)/4 = 3, a(5) = (1+3+2+6+13)/5 = 5, etc..
%o (PARI) v=[1]; n=1; while(#v<200, s=(n+vecsum(v))/(#v+1); if(type(s)=="t_INT", if(isprime(s)&&!vecsearch(vecsort(v), n), print1(s,", ");v=concat(v, n); n=0)); n++)
%Y Cf. A073883.
%K nonn
%O 2,1
%A _Derek Orr_, Jun 26 2015
