A101874 Number of Abelian groups of order 4n+3.

1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 2, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 7, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 3, 1, 3, 1, 1, 2, 1, 1, 3, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1

Offset

0,7

Links

Table of n, a(n) for n=0..104.

Mathematica

a[n_] := FiniteAbelianGroupCount[4*n + 3]; Array[a, 100, 0] (* Amiram Eldar, Sep 23 2023 *)

Crossrefs

Bisection of A101871.

Cf. A101873, A101876.

Sequence in context: A031245 A031244 A030576 * A318449 A336651 A066715

Adjacent sequences: A101871 A101872 A101873 * A101875 A101876 A101877

Keyword

nonn,easy

Author

N. J. A. Sloane, Jan 28 2005

Extensions

More terms from Joshua Zucker, May 10 2006

Status

approved