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 A318587 #10 Aug 30 2018 08:36:26 %S A318587 2,81,8775,64827,950625,1953125,7022925,9055935,21781575,36020025, %T A318587 50124555,51883209,57909033,102984375,118978125,760816875,816747435, %U A318587 981059625,1206902781,1265058675,1387132263,2359670625,3902169375,4868424351,5222768733,5430160125 %N A318587 Heinz numbers of integer partitions whose sum of reciprocals squared is 1. %C A318587 The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k). %e A318587 The sequence of integer partitions with Heinz numbers in this sequence begins: (1), (2222), (633222), (4444222), (66333322). %t A318587 Select[Range[100000],Total[If[#==1,{},Cases[FactorInteger[#],{p_,k_}:>k/PrimePi[p]^2]]]==1&] %Y A318587 Cf. A001222, A051908, A056239, A112798, A289506, A289507, A316855, A316856, A316857. %Y A318587 Cf. A318584, A318585, A318586, A318588, A318589. %K A318587 nonn %O A318587 1,1 %A A318587 _Gus Wiseman_, Aug 29 2018 %E A318587 a(6)-a(26) from _Alois P. Heinz_, Aug 30 2018