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 A354526 #16 Aug 17 2022 05:07:26 %S A354526 4,8,10,12,16,18,20,22,24,26,27,28,30,32,34,36,38,39,40,42,44,46,48, %T A354526 50,52,54,56,57,58,60,63,64,65,66,68,70,72,74,75,76,78,80,81,82,84,86, %U A354526 87,88,90,92,94,96,98,99,100,102,104,105,106,108,110,111,112,114,116,117 %N A354526 Numbers k such that A354512(k) < omega(k); complement of A354525. %C A354526 Numbers k such that there is a prime factor p of k such that gpf(k+p) != p. %C A354526 Numbers k such that there is a prime factor p of k such that k+p is not p-smooth. %H A354526 Jianing Song, <a href="/A354526/b354526.txt">Table of n, a(n) for n = 1..7946</a> (all terms <= 10000) %e A354526 57 is a term since the prime factors of 57 are 3,19, and we have gpf(57+3) != 3. %o A354526 (PARI) gpf(n) = vecmax(factor(n)[, 1]); %o A354526 isA354526(n) = my(f=factor(n)[, 1]); for(i=1, #f, if(gpf(n+f[i])!=f[i], return(1))); 0 %Y A354526 Cf. A001221, A354512, A006530. Indices of positive terms in A354527. %K A354526 nonn,easy %O A354526 1,1 %A A354526 _Jianing Song_, Aug 16 2022