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 A250193 #17 Sep 08 2022 08:46:10 %S A250193 2,3,7,16,17,18,25,46,47,106,110,111,118,136,144,145,230,238,361,382, %T A250193 422,439,474,494,495,519,588,639,657,707,733,751,802,831,863,902,925, %U A250193 976,994,1001,1059,1140,1181,1240,1249,1319,1375,1442,1458,1508,1699,1734,1751,1757,1760,1766,1807,1849,1897,1904,1914,1922 %N A250193 Numbers n such that Phi(46,n) is prime, where Phi is the cyclotomic polynomial. %H A250193 G. C. Greubel, <a href="/A250193/b250193.txt">Table of n, a(n) for n = 1..10000</a> %t A250193 Select[Range[2000], PrimeQ[(#^23 + 1) / (# + 1)] &] (* _Vincenzo Librandi_, Jan 15 2015 *) %o A250193 (Magma) [n: n in [1..2000]| IsPrime((n^23+1) div (n+1))]; // _Vincenzo Librandi_, Jan 15 2015 %o A250193 (PARI) is(n)=isprime(polcyclo(46,n)) \\ _Charles R Greathouse IV_, Sep 08 2015 %Y A250193 Cf. A246392. %K A250193 nonn %O A250193 1,1 %A A250193 _R. J. Mathar_, Jan 12 2015