|
%I #9 Mar 05 2018 04:09:24
%S 353,2351,3673,3863,4759,6271,8539,8821,11261,12073,17839,26711,32797,
%T 33769,34679,41357,53269,60217,64879,64891,68713,88493,90121,91811,
%U 101347,101411,101641,108139,108203,114659,122029,123637,127843,128237,130447,133279
%N Balanced primes of order thirteen.
%H Muniru A Asiru, <a href="/A300364/b300364.txt">Table of n, a(n) for n = 1..7200</a>
%e 353 is a member because 353 = 271 + 277 + 281 + 283 + 293 + 307 + 311 + 313 + 317 + 331 + 337 + 347 + 349 + 353 + 359 + 367 + 373 + 379 + 383 + 389 + 397 + 401 + 409 + 419 + 421 + 431 + 433 = 9531/27.
%o (GAP) P:=Filtered([1..150000],IsPrime);;
%o a:=List(Filtered(List([0..13000],k->List([1..27],j->P[j+k])),i->Sum(i)/27=i[14]),m->m[14]);
%Y Cf. Balanced primes of order b: A006562 (b=1), A082077 (b=2), A082078 (b=3), A082079 (b=4), A096697 (b=5), A096698 (b=6), A096699 (b=7), A096700 (b=8), A096701 (b=9), A096702 (b=10), A096703 (b=11), A096704 (b=12), this sequence (b=13), A300365 (b=14).
%K nonn
%O 1,1
%A _Muniru A Asiru_, Mar 04 2018
|
