Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #8 Dec 28 2021 10:35:49
%S 1,5,8,10,11,12,14,21,23,24,27,63,64,72,90,99,144,176,184,340,366,393,
%T 480,567,693,915,975,1046,1068,1084,1260,1410,1452,1830,1968,2268,
%U 2490,2943,3087,3735,5284,5426,5637,5757,6015,6334,6393,6570,6582,8292,9836,10005
%N Numbers k such that Sum_{j=1..k} (pi(k*j-j+1) - pi(k*j-j)) = Sum_{i=1..k} (pi(k*(i-1)+i) - pi(k*(i-1)+i-1)).
%C Numbers with the same number of primes appearing along the main diagonal and along the main antidiagonal of an n X n square array whose elements are the numbers from 1..n^2, listed in increasing order by rows (see example).
%F Numbers k such that A221490(k) = A344349(k).
%e 5 is in the sequence since there are 3 primes along the main diagonal and 3 primes along the main antidiagonal of the 5 X 5 array below.
%e [1 2 3 4 5]
%e [6 7 8 9 10]
%e [11 12 13 14 15]
%e [16 17 18 19 20]
%e [21 22 23 24 25]
%t q[k_] := Sum[Boole @ PrimeQ[k*j - j + 1] - Boole @ PrimeQ[k*(j - 1) + j], {j, 1, k}] == 0; Select[Range[1000], q] (* _Amiram Eldar_, Dec 28 2021 *)
%Y Cf. A000720 (pi), A221490, A344349, A350328.
%K nonn
%O 1,2
%A _Wesley Ivan Hurt_, Dec 28 2021
%E More terms from _Amiram Eldar_, Dec 28 2021