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 A343004 #25 May 01 2021 22:14:44
%S A343004 2,3,2,5,2,7,3,5,3,7,2,11,2,13,3,11,2,17,5,7,2,19,3,13,2,23,3,17,5,11,
%T A343004 3,19,2,29,2,31,5,13,3,23,2,37,7,11,2,41,5,17,2,43,3,29,7,13,3,31,2,
%U A343004 47,5,19,2,53,3,37,5,23,2,59,7,17,2,61,3,41,3,43,7,19,2,67,3,47,2,71,11,13,5,29
%N A343004 Pairwise listing of the prime factors of the squarefree semiprimes (smaller, larger).
%C A343004 Interspersion of A096916 and A070647.
%e A343004 The first squarefree semiprime is 6 = 2*3. Therefore a(1) = 2 and a(2) = 3.
%t A343004 Flatten@ Map[FactorInteger[#][[All, 1]] &, Select[Range[6, 150], And[PrimeOmega[#] == 2, SquareFreeQ[#]] &]] (* or *)
%t A343004 Block[{nn = 35, a = {}, lim}, lim = Prime[nn]; Do[Do[If[#3 <= lim, AppendTo[a, {#3, #2, #1}], Break[]] & @@ {#1, #2, #1 #2} & @@ {Prime[i], Prime[j]}, {i, j + 1, nn}], {j, nn}]; Flatten@ Sort[a][[All, 2 ;; 3]]] (* _Michael De Vlieger_, May 01 2021 *)
%Y A343004 Cf. A006881, A096916 and A070647 (lesser and larger prime factors).
%K A343004 nonn
%O A343004 1,1
%A A343004 _Wesley Ivan Hurt_, Apr 28 2021