cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A319153 Number of integer partitions of n that reduce to 2, meaning their Heinz number maps to 2 under A304464.

This page as a plain text file.
%I A319153 #4 Sep 15 2018 15:46:47
%S A319153 0,2,1,3,5,7,12,17,24,33,44,57,76,100,129,168,214,282,355,462,586,755,
%T A319153 937,1202,1493,1900,2349,2944,3621,4520,5514,6813,8298,10150,12240,
%U A319153 14918,17931,21654,25917,31081,37029,44256,52474,62405,73724,87378,102887
%N A319153 Number of integer partitions of n that reduce to 2, meaning their Heinz number maps to 2 under A304464.
%C A319153 Start with an integer partition y of n. Given a multiset, take the multiset of its multiplicities. Repeat until a multiset of size 1 is obtained. If this multiset is {2}, we say that y reduces to 2. For example, we have (3211) -> (211) -> (21) -> (11) -> (2), so (3211) reduces to 2.
%e A319153 The a(7) = 12 partitions:
%e A319153   (43), (52), (61),
%e A319153   (322), (331), (511),
%e A319153   (2221), (3211), (4111),
%e A319153   (22111), (31111),
%e A319153   (211111).
%t A319153 Table[Length[Select[IntegerPartitions[n],NestWhile[Sort[Length/@Split[#]]&,#,Length[#]>1&]=={2}&]],{n,30}]
%Y A319153 Cf. A000837, A098859, A181819, A182850, A304464, A304465, A304634, A305563, A317245, A319149.
%K A319153 nonn
%O A319153 1,2
%A A319153 _Gus Wiseman_, Sep 12 2018