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 A344843 #57 Nov 18 2021 15:14:42
%S A344843 98,124,152,170,174,188,230,242,243,244,284,342,343,350,368,374,404,
%T A344843 423,424,428,434,440,474,475,494,506,530,548,574,594,602,603,604,608,
%U A344843 636,637,638,644,650,656,663,664,710,714,724,728,740,774,775,782,804,824
%N A344843 The smallest of three consecutive integers that are products of three or more primes.
%H A344843 David A. Corneth, <a href="/A344843/b344843.txt">Table of n, a(n) for n = 1..10000</a>
%e A344843 98 = 2*7*7, 99 = 3*3*11, 100 = 2*2*5*5. Three consecutive integers 98, 99, and 100 are each products of three or more primes. Thus, 98 is a term.
%t A344843 Select[Range[1002], Total[Transpose[FactorInteger[#]][[2]]] >= 3 && Total[Transpose[FactorInteger[# + 1]][[2]]] >= 3 && Total[Transpose[FactorInteger[# + 2]][[2]]] >= 3 &]
%t A344843 p3pQ[k_]:=Boole[#>2&/@k]=={1,1,1}; Position[Partition[PrimeOmega[ Range[ 900]],3,1],_?p3pQ]//Flatten (* _Harvey P. Dale_, Nov 18 2021 *)
%o A344843 (PARI) is(n) = for(i = 0, 2, if(bigomega(n + i) < 3, return(0))); 1 \\ _David A. Corneth_, Jun 08 2021
%K A344843 nonn
%O A344843 1,1
%A A344843 _Tanya Khovanova_, Jun 07 2021