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.
%I A316855 #8 Jul 15 2018 13:26:10
%S A316855 2,9,125,147,195,2401,3185,4225,6475,6591,7581,10101,10527,16401,
%T A316855 20445,20535,21045,25365,46155,107653,123823,142805,161051,164255,
%U A316855 164983,171941,218855,228085,267883,304175,312785,333925,333935,335405,343735,355355,390963
%N A316855 Heinz numbers of integer partitions whose reciprocal sum is 1.
%C A316855 The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k.
%C A316855 The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).
%e A316855 Sequence of all integer partitions whose reciprocal sum is 1 begins: (1), (2,2), (3,3,3), (4,4,2), (6,3,2), (4,4,4,4), (6,4,4,3), (6,6,3,3), (12,4,3,3), (6,6,6,2), (8,8,4,2).
%t A316855 Select[Range[2,10000],Sum[m[[2]]/PrimePi[m[[1]]],{m,FactorInteger[#]}]==1&]
%Y A316855 Cf. A000041, A051908, A056239, A058360, A072411, A296150, A316854, A316856, A316857.
%K A316855 nonn
%O A316855 1,1
%A A316855 _Gus Wiseman_, Jul 14 2018