The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A267010

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A267010

Primes of the form p==3 (mod 4) such that the average of their primitive roots equals p/2.
(history; published version)

#31 by R. J. Mathar at Wed Aug 14 13:35:15 EDT 2024

STATUS

editing

approved

#30 by R. J. Mathar at Wed Aug 14 13:35:08 EDT 2024

MAPLE

isA267010 := proc(n)

if isprime(n) and modp(n, 4) = 3 then

isA266987(n) ;

else

false;

end if;

end proc: # R. J. Mathar, Aug 14 2024

STATUS

approved

editing

#29 by N. J. A. Sloane at Mon Oct 11 18:28:23 EDT 2021

STATUS

reviewed

approved

#28 by Joerg Arndt at Mon Oct 11 10:32:56 EDT 2021

STATUS

proposed

reviewed

#27 by Michel Marcus at Mon Oct 11 02:50:42 EDT 2021

STATUS

editing

proposed

#26 by Michel Marcus at Mon Oct 11 02:50:38 EDT 2021

EXAMPLE

a(1)=19. The is a term because the primitive roots of 19 are 2, 3, 10, 13, 14, and 15. Their average is (2+3+10+13+14+15)/phi(18)=57/phi(18)=57/6=19/2.

STATUS

proposed

editing

#25 by Amiram Eldar at Mon Oct 11 02:46:25 EDT 2021

STATUS

editing

proposed

#24 by Amiram Eldar at Mon Oct 11 02:41:25 EDT 2021

MATHEMATICA

Select[4*Range[1000] + 3, PrimeQ[#] && Mean[PrimitiveRootList[#]] == #/2 &] (* Amiram Eldar, Oct 11 2021 *)

STATUS

approved

editing

#23 by Bruno Berselli at Tue Feb 02 03:42:39 EST 2016

STATUS

editing

approved

#22 by Bruno Berselli at Tue Feb 02 03:42:36 EST 2016

NAME

Primes of the form p==3 (mod 4) such that the average of their primitive roots equals p/2.

STATUS

approved

editing