login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A328546
Number of 12-regular partitions of n (no part is a multiple of 12).
12
1, 1, 2, 3, 5, 7, 11, 15, 22, 30, 42, 56, 76, 100, 133, 173, 226, 290, 374, 475, 605, 762, 960, 1199, 1497, 1856, 2299, 2831, 3482, 4261, 5208, 6337, 7700, 9321, 11266, 13572, 16325, 19578, 23444, 27999, 33389, 39721, 47185, 55929, 66199, 78199, 92246
OFFSET
0,3
REFERENCES
Kathiravan, T., and S. N. Fathima. "On L-regular bipartitions modulo L." The Ramanujan Journal 44.3 (2017): 549-558.
LINKS
FORMULA
a(n) ~ exp(Pi*sqrt(2*n*(s-1)/(3*s))) * (s-1)^(1/4) / (2 * 6^(1/4) * s^(3/4) * n^(3/4)) * (1 + ((s-1)^(3/2)*Pi/(24*sqrt(6*s)) - 3*sqrt(6*s) / (16*Pi * sqrt(s-1))) / sqrt(n) + ((s-1)^3*Pi^2/(6912*s) - 45*s/(256*(s-1)*Pi^2) - 5*(s-1)/128) / n), set s=12. - Vaclav Kotesovec, Aug 01 2022
MAPLE
f:=(k, M) -> mul(1-q^(k*j), j=1..M);
LRP := (L, M) -> f(L, M)/f(1, M);
s := L -> seriestolist(series(LRP(L, 80), q, 60));
s(12);
MATHEMATICA
Table[Count[IntegerPartitions@n, x_ /; ! MemberQ [Mod[x, 12], 0, 2] ], {n, 0, 46}] (* Robert Price, Jul 28 2020 *)
CROSSREFS
Number of r-regular partitions for r = 2 through 12: A000009, A000726, A001935, A035959, A219601, A035985, A261775, A104502, A261776, A328545, A328546.
Sequence in context: A036011 A325856 A104501 * A242697 A218512 A008635
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Oct 19 2019
STATUS
approved

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy