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 A360842 #15 Feb 16 2025 08:34:04 %S A360842 139968,995328,63700992,4076863488,17714700000,82012500000, %T A360842 98802571392,174960000000,445240556352,641194278912,889223142528, %U A360842 1059917571072,1594323000000,1663012435968,2348273369088,3333709317312,5717741400000,16260080320512,19144761127488,28697814000000 %N A360842 5-full numbers (A069492) sandwiched between twin primes. %H A360842 Amiram Eldar, <a href="/A360842/b360842.txt">Table of n, a(n) for n = 1..250</a> (terms below 3*10^19) %H A360842 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/TwinPrimes.html">Twin Primes</a>. %H A360842 Wikipedia, <a href="https://en.wikipedia.org/wiki/Powerful_number#Generalization">Powerful number: Generalization</a>. %H A360842 <a href="/index/Pow#powerful">Index entries for sequences related to powerful numbers</a>. %e A360842 139968 = 2^6 * 3^7 is a term since it is 5-full and 139967 and 139969 are twin primes. %t A360842 Select[6*Range[2*10^5], PrimeQ[# - 1] && PrimeQ[# + 1] && Min[FactorInteger[#][[;; , 2]]] > 4 &] %o A360842 (PARI) is(n) = isprime(n-1) && isprime(n+1) && vecmin(factor(n)[,2]) > 4; %Y A360842 Intersection of A014574 and A069492. %Y A360842 Subsequence of A113839, A360840 and A360841. %K A360842 nonn %O A360842 1,1 %A A360842 _Amiram Eldar_, Feb 23 2023