OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Andrew Misseldine, Counting Schur Rings over Cyclic Groups, arXiv preprint arXiv:1508.03757 [math.RA], 2015.
MAPLE
f1:=proc(n) local p; p:=ithprime(n);
2*p+61+2*gcd(p-1, 3)+gcd(p-1, 4);
end;
MATHEMATICA
Table[2 Prime[n] + 61 + 2 GCD[Prime[n] - 1, 3] + GCD[Prime[n] -1, 4], {n, 60}] (* Vincenzo Librandi, Mar 26 2016 *)
PROG
(Magma) [2*p+61 +2*Gcd(p-1, 3)+Gcd(p-1, 4): p in PrimesUpTo(700)]; // Vincenzo Librandi, Mar 26 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 22 2016
STATUS
approved