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 A338388 #8 Oct 24 2020 04:03:32
%S A338388 2,5,8,10,11,18,19,22,25,33,37,42,46,48,51,52,53,55,57,58,59,65,70,73,
%T A338388 78,87,88,92,94,96,102,103,104,109,111,114,115,116,119,121,122,135,
%U A338388 144,145,149,150,155,157,164,165,166,176,181,182,183,185,190,191,195
%N A338388 Numbers k such that there is a single biquadratefree powerful number (A338325) between k^2 and (k+1)^2.
%C A338388 Positions of 1's in A338326.
%C A338388 The asymptotic density of this sequence is 0.308276695... (Dehkordi, 1998).
%H A338388 Amiram Eldar, <a href="/A338388/b338388.txt">Table of n, a(n) for n = 1..10000</a>
%H A338388 Massoud H. Dehkordi, <a href="https://hdl.handle.net/2134/12177">Asymptotic formulae for some arithmetic functions in number theory</a>, Ph.D. thesis, Loughborough University, 1998.
%e A338388 2 is a term since there is a single biquadratefree powerful number, 8 = 2^3, between 2^2 = 4 and (2+1)^2 = 9.
%t A338388 bqfpowQ[n_] := AllTrue[FactorInteger[n][[;; , 2]], MemberQ[{2, 3}, #] &]; Select[Range[200], Count[Range[#^2 + 1, (# + 1)^2 - 1], _?bqfpowQ] == 1 &]
%Y A338388 Cf. A336176, A338325, A338326, A338327, A338387, A338389, A338390, A338391, A338392.
%K A338388 nonn
%O A338388 1,1
%A A338388 _Amiram Eldar_, Oct 23 2020