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 A328518 #17 Dec 18 2024 09:27:13 %S A328518 1,1,2,1,3,3,4,3,3,5,8,7,8,9,10,8,9,9,9,12,11,10,11,13,13,13,13,14,16, %T A328518 16,16,18,18,17,21,19,18,18,22,22,23,22,23,22,25,26,28,28,27,27,29,29, %U A328518 30,31,32,34,30,29,29,30,31,33,35,35,32,30,32,33,31,30,30,33 %N A328518 Number of terms k in A002182 that have A001222(k) = n. %C A328518 If for every term t > 1 in A002182 there is some term t/p where p|t in A002182 then a(n) > 0 for all n. %C A328518 The above hypothesis isn't true, e.g., t = A002182(815) is a counterexample. But it is surely true that a(n) > 0 for all n, see the graph of A112778. - _M. F. Hasler_, Jan 08 2020 %o A328518 (PARI) {my(v=v112778,c=Vec(0,vecmax(v)));for(i=2,#v,c[v[i]]++);c[1..-log(#c)\1]} \\ Does not include the leading a(0)=1. Discards log(#c) possibly inaccurate trailing terms. Vector v112778 must be defined, e.g., from b-file of A112778. - _M. F. Hasler_, Jan 08 2020 %Y A328518 Cf. A001222, A002182. %Y A328518 Cf. A112778 (bigomega of HCNs). %K A328518 nonn %O A328518 0,3 %A A328518 _David A. Corneth_, Jan 04 2020