login
A180511
Fermat quotients for base 4: (4^(p - 1) - 1)/p, where p = prime(n).
4
5, 51, 585, 95325, 1290555, 252645135, 3616814565, 764877654105, 2484744621997515, 37191016277640225, 127631526564044465235, 29485995600356809139175, 449832863112420158030205
OFFSET
2,1
MAPLE
A180511:= n-> map (p-> (4^(p-1)-1)/p, ithprime(n)):
seq (A180511(n), n=2..20); # Peter Luschny, Jan 21 2010
MATHEMATICA
Table[(4^(Prime[n] - 1) - 1)/Prime[n], {n, 2, 20}] (* Alonso del Arte, Jan 20 2011 *)
CROSSREFS
Sequence in context: A088320 A223002 A370172 * A245926 A190734 A154886
KEYWORD
nonn
AUTHOR
Jani Melik, Jan 20 2011
STATUS
approved