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 A342188 #8 Mar 06 2021 06:00:34 %S A342188 80,624,2511,5264,6399,7695,7856,10287,13040,14640,15471,15632,18063, %T A342188 19375,20624,20816,23247,23408,25839,27135,28560,28592,31023,31184, %U A342188 33615,35072,36015,36368,38799,38960,39375,40816,41391,44144,46250,46575,46736,49167,51920 %N A342188 Numbers k such that both k and k+1 are not exponentially squarefree numbers. %C A342188 The numbers of terms not exceeding 10^k for k = 2, 3, ..., are 1, 2, 7, 72, 719, 7226, 72238, 722565, 7225651, ... Apparently this sequence has an asymptotic density 0.00007225... %H A342188 Amiram Eldar, <a href="/A342188/b342188.txt">Table of n, a(n) for n = 1..10000</a> %e A342188 80 is a term since 80 = 2^4 * 5 and 81 = 3^4 both have a nonsquarefree exponent in their prime factorization. %t A342188 expSqFQ[n_] := AllTrue[FactorInteger[n][[;;, 2]], SquareFreeQ]; Select[Range[5*10^4], !expSqFQ[#] && !expSqFQ[# + 1] &] %Y A342188 Cf. A130897, A209061. %Y A342188 Similar sequences: A068140, A068781, A342187, A342189. %K A342188 nonn %O A342188 1,1 %A A342188 _Amiram Eldar_, Mar 04 2021