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 A239699 #11 Mar 29 2014 05:17:58 %S A239699 6,10,14,21,22,26,28,34,38,39,44,46,55,57,58,62,63,74,76,82,86,92,93, %T A239699 94,105,106,111,117,118,122,124,129,134,142,146,155,158,165,166,172, %U A239699 178,183,188,194,195,201,202,203,205,206,214,218,219,226,231,236,237 %N A239699 Numbers n such that the number of Abelian groups of order n is equal to the number of non-Abelian groups of order n. %C A239699 Numbers n such that A000688(n) = A060689(n). %H A239699 Michel Lagneau, <a href="/A239699/b239699.txt">Table of n, a(n) for n = 1..390</a> %e A239699 6 is in the sequence because there are 2 groups of order 6: 1 commutative group and 1 non-commutative group. Then A000688(6) = A060689(6) = 1. %e A239699 44 is in the sequence because there are 4 groups of order 44: 2 commutative groups and 2 non-commutative groups. Then A000688(44) = A060689(44) = 2. %t A239699 lst:={};f[n_]:=Times@@PartitionsP/@Last/@FactorInteger@n;g[n_]:=FiniteGroupCount[n]-FiniteAbelianGroupCount[n];Do[If[f[n]==g[n],AppendTo[lst,n]],{n,500}];lst %Y A239699 Cf. A000688, A060689, A238877. %K A239699 nonn %O A239699 1,1 %A A239699 _Michel Lagneau_, Mar 24 2014