login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A369787 Number of different coefficient values in expansion of Product_{k=1..n} (1+x^(k*(k+1)/2)). 1

%I #10 Feb 01 2024 19:01:49

%S 1,1,2,2,3,3,4,5,6,8,13,19,28,44,71,112,168,249,321,419,549,652,797,

%T 939,1104,1265,1440,1638,1842,2059,2295,2538,2809,3087,3385,3698,4032,

%U 4381,4754,5143,5554,5985,6437,6910,7405,7922,8463,9027,9615,10227,10865,11528

%N Number of different coefficient values in expansion of Product_{k=1..n} (1+x^(k*(k+1)/2)).

%o (PARI) a(n) = #Set(Vec(prod(k=1, n, 1+x^(k*(k+1)/2))));

%o (Python)

%o from collections import Counter

%o def A369787(n):

%o c = {0:1}

%o for k in range(1,n+1):

%o m, d = k*(k+1)>>1, Counter(c)

%o for j in c:

%o d[j+m] += c[j]

%o c = d

%o return len(set(c.values()))+int(max(c)+1>len(c)) # _Chai Wah Wu_, Feb 01 2024

%Y Cf. A024940, A039822.

%K nonn

%O 0,3

%A _Seiichi Manyama_, Feb 01 2024

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified August 19 08:00 EDT 2024. Contains 375284 sequences. (Running on oeis4.)