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 A382229 #19 Mar 23 2025 14:01:45 %S A382229 1,2,4,5,6,7,9,11,14,17,21,23,25,27,33,37,38,41,46,47,49,50,51,52,54, %T A382229 63,65,66,69,70,74,75,77,78,81,92,93,97,106,107,111,113,115,116,118, %U A382229 124,126,130,132,138,140,147,150,153,155,157,158,163,166,167,169,170,177,179,183,186 %N A382229 a(0) = 1; thereafter a(n) is the next larger number that compared to the previous term differs by +-1 in the number of prime factors counted with multiplicity. %C A382229 a(n+1) is the least integer k > a(n) such that abs(bigomega(k) - bigomega(a(n))) = 1. %C A382229 Do an infinite number of primes appear in the sequence? %F A382229 a(n) = A071192(a(n-1)). - _Pontus von Brömssen_, Mar 21 2025 %e A382229 Example: 52 = 2*2*13 is a term. 53 is not a term because it has -2 prime factors compared to 52. 54 = 2*3*3*3 is a term because it has +1 factor compared to 52. 55 = 5*11 is not a term because it has -2 factors compared to 54. 56 is not a term because it has the same number of factors as 54. %o A382229 (PARI) lista(n)={my(L=List(), p=0, k=1); while(#L<n, k++; my(t=bigomega(k)); if(abs(t-p)==1, listput(L,k); p=t)); Vec(L)} \\ _Andrew Howroyd_, Mar 20 2025 %Y A382229 Cf. A001222 (bigomega), A071192. %K A382229 nonn %O A382229 0,2 %A A382229 _Gordon Hamilton_, Mar 19 2025