OFFSET
0,4
COMMENTS
Two primes are considered right-equivalent if they differ by right multiplication by one of the 24 units.
REFERENCES
L. E. Dickson, Algebras and Their Arithmetics, Dover, 1960, Section 91.
LINKS
R. J. Mathar, Table of n, a(n) for n = 0..10000
FORMULA
a(n) = A055671(n)/24.
MATHEMATICA
A055671[n_] := If[PrimeQ[n], Reduce[a^2 + b^2 + c^2 + d^2 == 4n, {a, b, c, d}, Integers] // Length, 0]; a[n_] := A055671[n]/24; Table[a[n], {n, 0, 100}] (* Jean-François Alcover, Oct 22 2016 *)
CROSSREFS
KEYWORD
nonn,easy,nice
AUTHOR
N. J. A. Sloane, Jun 09 2000
EXTENSIONS
STATUS
approved