login
Prime numbers that are the exact average of nine consecutive odd semiprimes.
2

%I #13 Oct 09 2023 18:37:55

%S 97,191,293,347,401,409,479,727,1823,1931,2063,2089,2897,2903,2999,

%T 3061,3083,3119,3571,3617,3673,3727,3967,4339,4373,4583,4639,4703,

%U 4813,5297,5347,5437,5639,5821,6047,6053,6311,6421,6491,6529,6761,6883,7283,7417,7451,7949,8059,8123,8237

%N Prime numbers that are the exact average of nine consecutive odd semiprimes.

%e 97 is a term because (77 + 85 + 87 + 91 + 93 + 95 + 111 + 115 + 119)/9 = 97 is prime.

%e 401 is a term because (381 + 391 + 393 + 395 + 403 + 407 + 411 + 413 + 415)/9 = 401 is prime.

%t Select[Mean /@ Partition[Select[Range[1, 9000, 2], PrimeOmega[#] == 2 &], 9, 1], PrimeQ] (* _Amiram Eldar_, Sep 25 2023 *)

%Y Cf. A000040, A046315.

%Y Cf. A363074, A363187, A363188, A364147, A364148, A364149, A364320, A364689.

%K nonn

%O 1,1

%A _Elmo R. Oliveira_, Sep 25 2023