OFFSET
1,1
LINKS
Bruno Berselli, Table of n, a(n) for n = 1..1000
L. Kaylor, D. Offner, Counting matrices over a finite field with all eigenvalues in the field, Involve, a Journal of Mathematics, Vol. 7 (2014), No. 5, 627-645. [DOI]
Michael Knapp, Two by Two Matrices with Both Eigenvalues in Z/pZ, Math. Mag., Vol. 79, No. 2, April 2006.
G. Olsavsky, The Number of 2 by 2 Matrices over Z/pZ with Eigenvalues in the Same Field, Math. Mag., 76 (2003), 314-317.
MATHEMATICA
Table[Prime[n]^2 (Prime[n]^2 + 2 Prime[n] - 1)/2, {n, 40}] (* Bruno Berselli, Oct 07 2013 *)
#^2 (#^2+2#-1)/2&/@Prime[Range[40]] (* Harvey P. Dale, Mar 13 2017 *)
PROG
(Magma) [p^2*(p^2+2*p-1)/2: p in PrimesUpTo(200)]; // Bruno Berselli, Oct 07 2013
(PARI) a(n)=p=prime(n); p^2*(p^2+2*p-1)/2 \\ Anders Hellström, Sep 04 2015
(PARI) lista(nn) = forprime(p=2, nn, print1(p^2*(p^2+2*p-1)/2, ", ")); \\ Michel Marcus, Sep 04 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 05 2013
STATUS
approved