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 A335655 #15 Jun 26 2021 20:31:54 %S A335655 23,53,59,63,83,89,103,111,119,131,139,149,151,161,197,227,233,293, %T A335655 299,303,307,347,349,377,379,389,391,395,399,407,443,461,487,491,509, %U A335655 519,521,539,551,557,563,566,569,571,591 %N A335655 Numbers k such that Omega(k+1) = Omega(k) + m, where Omega(k) = A001222(k) is the number of prime factors of k with multiplicity, case m = 3. %e A335655 23 is in the sequence since Omega(24) = 4 = 1 + 3 = Omega(23) + 3. %t A335655 m = 3; s = {}; Do[If[PrimeOmega[x + 1] == PrimeOmega[x] + m, AppendTo[s, x]], {x, 600}]; s %Y A335655 Cf. A001222, A076156 (case m=1), A335652 (case m=2). %K A335655 nonn %O A335655 1,1 %A A335655 _Zak Seidov_, Jun 16 2020