// script for PARI solve for entries (here I show a running start from HCN=


//  next writes to programs\pari directory!  must open with wordpad, NOT notepad!! for proper newline treatment
//for abs offset

closestprime(N) =
  { local(p,q);
    p = precprime(N);
    q = nextprime(N+1);
    if (N - p < q - N, p, q)
  }
a=224; v=[1]; for(k=665280, 4000000000000000, b=numdiv(k);
if(b>a, a=b; v=concat(v, k); write("junk.txt",k, ",",abs(closestprime(k)-k)); v=vecextract(v, "1..")))