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 A319165 #4 Sep 15 2018 15:47:57 %S A319165 9,25,27,49,81,121,125,169,243,289,343,361,441,529,625,729,841,961, %T A319165 1331,1369,1521,1681,1849,2187,2197,2209,2401,2809,3125,3249,3481, %U A319165 3721,3969,4225,4489,4913,5041,5329,6241,6561,6859,6889,7569,7921,8281,9261,9409 %N A319165 Perfect powers whose prime indices are not relatively prime. %C A319165 A prime index of n is a number m such that prime(m) divides n. %e A319165 The sequence of integer partitions whose Heinz numbers are in the sequence begins: (22), (33), (222), (44), (2222), (55), (333), (66), (22222), (77), (444), (88), (4422), (99), (3333), (222222). %t A319165 Select[Range[10000],With[{t=Transpose[FactorInteger[#]]},And[GCD@@PrimePi/@t[[1]]>1,GCD@@t[[2]]>1]]&] %Y A319165 Cf. A001597, A056239, A072774, A181819, A289509, A296150, A298748, A319151, A319161, A319163, A319164. %K A319165 nonn %O A319165 1,1 %A A319165 _Gus Wiseman_, Sep 12 2018