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 A362427 #8 Feb 16 2025 08:34:05
%S A362427 1,0,0,0,1,0,0,0,2,1,0,0,3,2,0,0,6,5,1,0,10,10,3,0,18,23,9,2,31,46,22,
%T A362427 6,56,94,56,19,102,184,129,50,187,364,293,134,349,710,638,332,661,
%U A362427 1384,1375,805,1287,2683,2904,1878,2547,5205,6069,4306,5150,10115,12530,9659,10558
%N A362427 Number of compositions (ordered partitions) of n into perfect powers > 1.
%H A362427 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PerfectPower.html">Perfect Power</a>.
%F A362427 G.f.: 1 / (1 - Sum_{k>=2} x^A001597(k)).
%t A362427 perfectPowerQ[n_] := GCD @@ FactorInteger[n][[;; , 2]] > 1; a[n_] := Total[Multinomial @@ Tally[#][[;; , 2]] & /@ Select[IntegerPartitions[n], AllTrue[#, perfectPowerQ] &]]; Array[a, 50, 0] (* _Amiram Eldar_, May 05 2023 *)
%Y A362427 Cf. A001597, A112344, A112345.
%K A362427 nonn
%O A362427 0,9
%A A362427 _Ilya Gutkovskiy_, Apr 19 2023