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 A354949 #24 Jun 14 2022 08:32:32 %S A354949 6,4,72,3528,108900,12744900,3852664200,260620460100,282251958288300 %N A354949 a(n) is the first interprime that is divisible by exactly n squares of primes. %C A354949 a(n) is the first member k of A024675 such that A056170(k) = n. %e A354949 a(2) = 72: 72 is an interprime because 72 = (71+73)/2 with 71 and 73 consecutive primes; 72 is divisible by the two squares of primes 2^2 and 3^2; and no smaller interprime is divisible by two squares of primes. %p A354949 f:= proc(n) local F,t; %p A354949 F:= ifactors(n)[2]; %p A354949 nops(select(t -> t[2]>=2, F)) %p A354949 end proc: %p A354949 V:= Array(0..5,-1): count:= 0: q:= 3: %p A354949 while count < 6 do %p A354949 p:= q; q:= nextprime(q); x:= (p+q)/2; %p A354949 v:= f(x); %p A354949 if V[v] = -1 then V[v]:= x; count:= count+1 fi %p A354949 od: %p A354949 convert(V,list): %Y A354949 Cf. A024675, A056170 %K A354949 nonn,more %O A354949 0,1 %A A354949 _J. M. Bergot_ and _Robert Israel_, Jun 13 2022 %E A354949 a(6) from _Amiram Eldar_, Jun 13 2022