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 A176587 #7 Aug 05 2022 17:02:50 %S A176587 1,6,10,12,14,18,20,22,24,26,28,30,34,36,38,40,44,46,48,50,52,54,56, %T A176587 58,60,62,66,68,70,72,74,76,80,82,86,88,90,92,94,96,98,100,102,104, %U A176587 106,108,112,116,118,120,122,124,130,132,134,136,138,140,142,144 %N A176587 Numbers such that arithmetic mean of distinct prime factors is not an integer. %C A176587 Complement of A078174. %e A176587 For a(14) = 36: 36 = 2^2*3^3; (2+3)/2 is not integer. %t A176587 Join[{1},Select[Range[300],!IntegerQ[Mean[FactorInteger[#][[All,1]]]]&]] (* _Harvey P. Dale_, Aug 05 2022 *) %K A176587 nonn %O A176587 1,2 %A A176587 _Jaroslav Krizek_, Apr 21 2010 %E A176587 Corrected and extended by _Harvey P. Dale_, Aug 05 2022