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 A316890 #5 Jul 16 2018 21:47:09 %S A316890 2,195,3185,6475,10527,16401,20445,20535,21045,25365,46155,164255, %T A316890 171941,218855,228085,267883,312785,333925,333935,335405,343735, %U A316890 355355,414295,442975,474513,527425,549575,607475,633777,691041,711321,722425,753865,804837,822783 %N A316890 Heinz numbers of integer partitions into relatively prime parts whose reciprocal sum is 1. %C A316890 The reciprocal sum of (y_1, ..., y_k) is 1/y_1 + ... + 1/y_k. %C A316890 The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k). %C A316890 Includes 29888089, which is the first perfect power in the sequence and is absent from A316888. %H A316890 Gus Wiseman, <a href="/A051908/a051908.txt">Sequences counting and ranking integer partitions by their reciprocal sums</a> %t A316890 Select[Range[2,100000],And[GCD@@PrimePi/@FactorInteger[#][[All,1]]==1,Sum[m[[2]]/PrimePi[m[[1]]],{m,FactorInteger[#]}]==1]&] %Y A316890 Cf. A000837, A002966, A051908, A058360, A289509, A296150, A316854, A316855, A316856, A316857, A316888-A316904. %K A316890 nonn %O A316890 1,1 %A A316890 _Gus Wiseman_, Jul 16 2018