OFFSET
1,6
COMMENTS
These are essentially the values that can be used to define "near-misses" in a search of terms for A007659, similar to how "near-Wieferich primes", "near-Wilson primes" and "near-Wall-Sun-Sun primes" are defined in searches for Wieferich primes (A001220), Wilson primes (A007540) and Wall-Sun-Sun (Fibonacci-Wieferich) primes.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Nik Lygeros and Olivier Rozier, A new solution for the equation tau(p)=0 (mod p), Journal of Integer Sequences 13 (2010), Article 10.7.4.
FORMULA
a(n) = 0 iff prime(n) is a term of A007659.
MATHEMATICA
a[n_] := Module[{p = Prime[n]}, Min[Abs[Mod[RamanujanTau[p], {-p, p}]]]]; Array[a, 100] (* Amiram Eldar, Jan 10 2025 *)
PROG
(PARI) a(n) = my(p=prime(n)); abs(centerlift(Mod(ramanujantau(p), p)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Felix Fröhlich, Dec 21 2020
STATUS
approved
