cp's OEIS Frontend

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.

A362426 Number of compositions (ordered partitions) of n into 2 perfect powers (A001597).

This page as a plain text file.
%I A362426 #8 Feb 16 2025 08:34:05
%S A362426 0,0,1,0,0,2,0,0,1,2,2,0,2,2,0,0,1,4,1,0,2,0,0,0,2,2,2,0,2,2,0,2,1,4,
%T A362426 2,2,4,2,0,0,4,4,0,2,2,2,0,0,2,0,3,0,4,2,1,0,0,4,2,2,0,2,0,2,1,4,0,0,
%U A362426 4,0,0,0,3,2,2,0,2,0,0,0,2,2,2,0,0,4,0,0,0,4,2,2
%N A362426 Number of compositions (ordered partitions) of n into 2 perfect powers (A001597).
%H A362426 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PerfectPower.html">Perfect Power</a>.
%t A362426 perfectPowerQ[n_] := n == 1 || GCD @@ FactorInteger[n][[;; , 2]] > 1; a[n_] := Total[Multinomial @@ Tally[#][[;; , 2]] & /@ Select[IntegerPartitions[n, {2}], AllTrue[#, perfectPowerQ] &]]; Array[a, 100, 0] (* _Amiram Eldar_, May 05 2023 *)
%Y A362426 Cf. A001597.
%K A362426 nonn
%O A362426 0,6
%A A362426 _Ilya Gutkovskiy_, Apr 19 2023