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 A349235 #8 Nov 12 2021 04:36:05
%S A349235 1374,4373,4911,5749,6857,13309,13374,16118,21247,24351,25622,28374,
%T A349235 31373,32749,33613,40471,41741,48247,49623,49733,52622,55374,57966,
%U A349235 58373,59749,75247,76623,79622,82374,85373,86749,90206,94470,98439,102247,103623,106622,107701
%N A349235 Numbers k such that k and k+4 are consecutive cubefree numbers.
%C A349235 The asymptotic density of this sequence is 0.000379098586237504... (Mossinghoff et al., 2021).
%H A349235 Amiram Eldar, <a href="/A349235/b349235.txt">Table of n, a(n) for n = 1..10000</a>
%H A349235 Michael J. Mossinghoff, Tomás Oliveira e Silva, and Tim Trudgian, <a href="https://doi.org/10.1090/mcom/3581">The distribution of k-free numbers</a>, Mathematics of Computation, Vol. 90, No. 328 (2021), pp. 907-929; <a href="https://arxiv.org/abs/1912.04972">arXiv preprint</a>, arXiv:1912.04972 [math.NT], 2019-2020.
%e A349235 1374 is a term since 1374 = 2*3*229 and 1374 + 4 = 1378 = 2*13*53 are cubefree, and 1374 + 1 = 1375 = 5^3*11, 1374 + 2 = 1376 = 2^5*43 and 1374 + 3 = 1377 = 3^4*17 are not.
%t A349235 cubeFreeQ[n_] := AllTrue[FactorInteger[n][[;; , 2]], # < 3 &]; Select[Range[10^5], Boole[cubeFreeQ /@ (# + Range[0, 4])] == {1, 0, 0, 0, 1} &]
%Y A349235 Cf. A004709, A046099, A340152, A349233, A349234.
%K A349235 nonn
%O A349235 1,1
%A A349235 _Amiram Eldar_, Nov 11 2021