A273085 -id:A273085

Search: a273085 -id:a273085

Displaying 1-1 of 1 result found.

page 1

A280150

Primes p such that 68^(p-1) == 1 (mod p^2).

+10
0

5, 7, 19, 113, 2741

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

For p = 5 and 113 is 68^(p-1) == 1 (mod p^3).

No further terms up to 7.74*10^13 (cf. Fischer link). - Felix Fröhlich, Dec 27 2016

LINKS

MATHEMATICA

Select[Prime[Range[500]], PowerMod[68, #-1, #^2]==1&] (* Harvey P. Dale, Aug 07 2019 *)

PROG

(PARI) forprime(p=1, , if(Mod(68, p^2)^(p-1)==1, print1(p, ", "))) \\ Felix Fröhlich, Dec 27 2016

CROSSREFS

Cf. A001220, A273085.

KEYWORD

nonn,more

AUTHOR

EXTENSIONS

a(5) from Felix Fröhlich, Dec 27 2016

STATUS

approved

page 1

Search completed in 0.005 seconds