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 A326642 #6 Jul 16 2019 22:01:56
%S A326642 0,0,0,0,0,0,0,0,0,0,2,0,1,0,0,1,1,0,0,0,4,2,0,0,3,1,2,1,2,0,7,0,4,2,
%T A326642 2,4,7,0,0,4,12,0,9,0,2,11,0,0,17,6,14,4,8,0,13,6,27,6,2,0,36,0,0,35,
%U A326642 32,8,20,0,11,6,56,0,91,0,2,17
%N A326642 Number of non-constant integer partitions of n whose mean and geometric mean are both integers.
%C A326642 The Heinz numbers of these partitions are given by A326646.
%H A326642 Wikipedia, <a href="https://en.wikipedia.org/wiki/Geometric_mean">Geometric mean</a>
%F A326642 a(n) = A326641(n) - A000005(n).
%e A326642 The a(30) = 7 partitions:
%e A326642 (27,3)
%e A326642 (24,6)
%e A326642 (24,3,3)
%e A326642 (16,8,2,2,2)
%e A326642 (9,9,9,1,1,1)
%e A326642 (8,8,8,2,2,2)
%e A326642 (8,8,4,4,1,1,1,1,1,1)
%t A326642 Table[Length[Select[IntegerPartitions[n],!SameQ@@#&&IntegerQ[Mean[#]]&&IntegerQ[GeometricMean[#]]&]],{n,0,30}]
%Y A326642 Partitions with integer mean and geometric mean are A326641.
%Y A326642 Heinz numbers of non-constant partitions with integer mean and geometric mean are A326646.
%Y A326642 Non-constant partitions with integer geometric mean are A326624.
%Y A326642 Cf. A051293, A067538, A067539, A102627, A316413, A326029, A326643, A326644, A326645, A326647.
%K A326642 nonn
%O A326642 0,11
%A A326642 _Gus Wiseman_, Jul 16 2019