A299172 Primes p such that Ramanujan number tau(p) is divisible by p-1.
2, 3, 59, 107
Offset: 1
Programs
-
Mathematica
Select[ Prime@ Range@ 30, Mod[ RamanujanTau@#, # - 1] == 0 &] (* Robert G. Wilson v, Feb 11 2018 *)
-
PARI
isok(p) = isprime(p) && !(ramanujantau(p) % (p-1)); \\ Michel Marcus, Feb 05 2018
Comments