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 A088378 #14 May 16 2025 07:26:38
%S A088378 1,8,27,8,125,8,343,8,27,8,1331,8,2197,8,27,8,4913,8,6859,8,27,8,
%T A088378 12167,8,125,8,27,8,24389,8,29791,8,27,8,125,8,50653,8,27,8,68921,8,
%U A088378 79507,8,27,8,103823,8,343,8,27,8,148877,8,125,8,27,8,205379,8,226981
%N A088378 a(n) = (smallest prime factor of n)^3; a(1) = 1.
%H A088378 Harvey P. Dale, <a href="/A088378/b088378.txt">Table of n, a(n) for n = 1..1000</a>
%H A088378 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/CubicNumber.html">Cubic Number</a>.
%H A088378 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/LeastPrimeFactor.html">Least Prime Factor</a>.
%F A088378 a(n) = A000578(A020639(n)).
%t A088378 Table[FactorInteger[n][[1,1]]^3,{n,70}] (* _Harvey P. Dale_, Aug 05 2019 *)
%o A088378 (PARI) a(n) = if(n == 1, 1, factor(n)[1,1]^3); \\ _Amiram Eldar_, May 16 2025
%Y A088378 Cf. A020639, A000578, A088377, A088379.
%K A088378 nonn,easy
%O A088378 1,2
%A A088378 _Reinhard Zumkeller_, Sep 28 2003