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 A364614 #7 Sep 13 2023 22:50:27 %S A364614 1,3,7,9,13,19,21,27,31,37,39,43,49,57,61,63,67,73,79,81,91,93,97,103, %T A364614 109,111,117,127,129,133,139,147,151,157,163,169,171,181,183,189,193, %U A364614 199,201,211,217,219,223,229,237,241,243,247,259,271,273,277,279 %N A364614 Numbers not divisible by any prime of the form 3*k - 1. %C A364614 The sequence is closed under multiplication. %t A364614 s = Select[Prime[Range[100]], Mod[#, 3] == 2 &] (* A003627 *) %t A364614 Select[r = Range[Max[s]], Intersection[#/s, r] == {} &] %Y A364614 Cf. A003627, A364832. %Y A364614 A215800 is a subsequence. %K A364614 nonn %O A364614 1,2 %A A364614 _Clark Kimberling_, Aug 09 2023