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 A282064 #7 Feb 16 2025 08:33:40
%S A282064 0,0,0,1,3,6,10,15,18,22,27,33,37,45,48,52,54,60,60,69,69,79,81,87,79,
%T A282064 93,87,97,99,114,99,120,111,130,126,150,135,168,141,160,147,177,144,
%U A282064 189,156,183,162,201,157,213,171,214,189,231,168,237,189,244,201,261,177,270,201,261,210,282,192,297,216,283,228
%N A282064 Expansion of (x + Sum_{p prime, k>=1} x^(p^k))^3.
%C A282064 Number of ways to write n as an ordered sum of three prime powers (1 included).
%H A282064 Ilya Gutkovskiy, <a href="/A282064/a282064.pdf">Extended graphical example</a>
%H A282064 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PrimePower.html">Prime Power</a>
%F A282064 G.f.: (x + Sum_{p prime, k>=1} x^(p^k))^3.
%e A282064 a(6) = 10 because we have [4, 1, 1], [3, 2, 1], [3, 1, 2], [2, 3, 1], [2, 2, 2], [2, 1, 3], [1, 4, 1], [1, 3, 2], [1, 2, 3] and [1, 1, 4].
%t A282064 nmax = 70; CoefficientList[Series[(x + Sum[Floor[1/PrimeNu[k]] x^k, {k, 2, nmax}])^3, {x, 0, nmax}], x]
%Y A282064 Cf. A000961, A098238, A280243, A282062.
%K A282064 nonn
%O A282064 0,5
%A A282064 _Ilya Gutkovskiy_, Feb 05 2017