OFFSET
1,2
COMMENTS
a(n) is multiplicative. This is the 2-dimensional analog of A000224.
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..210
PROG
(Sage)
def A68197(n):
S = set()
L = list(range(n))
for a, b, c, d in cartesian_product([L, L, L, L]):
M = Matrix([[a, b], [c, d]])
N = tuple(x % n for x in (M * M).list())
if N not in S:
S.add(N)
print(n, len(S)) # Manfred Scheucher, Jun 12 2015
(PARI) a(n)={my(M=Map()); for(a=0, n-1, for(b=0, n-1, for(c=0, n-1, for(d=0, n-1, mapput(M, lift(Mod([a, b; c, d], n)^2), 1))))); #M} \\ Andrew Howroyd, Aug 06 2018
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Sharon Sela (sharonsela(AT)hotmail.com), Mar 23 2002
EXTENSIONS
More terms from Manfred Scheucher, Jun 12 2015
a(45) corrected by Giovanni Resta, Jun 12 2015
a(1) added by Andrew Howroyd, Aug 06 2018
STATUS
approved