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 A073102 #26 Feb 21 2025 16:43:37 %S A073102 211,421,631,1051,1471,2311,2521,2731,3361,3571,4201,4621,4831,5881, %T A073102 6091,6301,7351,7561,8191,8821,9241,9661,9871,10501,10711,11131,11551, %U A073102 11971,12391,12601,13441,14071,14281,15121,15331,15541,16381,17011 %N A073102 Primes of the form 210n + 1. %e A073102 211 = 210*1 + 1 is prime; 1471 = 210*7 + 1 is prime. %t A073102 210*Flatten[Position[PrimeQ[210Range[100]+1], True]]+1 %t A073102 Select[1+210Range[100],PrimeQ] (* _Ray Chandler_, Apr 29 2010 *) %o A073102 (Magma) [ a: n in [0..400] | IsPrime(a) where a is 210*n+1]; // _Vincenzo Librandi_, Aug 08 2010 %o A073102 (PARI) select(x->((x % 210)==1), primes(3000)) \\ _Michel Marcus_, Jan 14 2018 %Y A073102 Subsequence of A142076, A124826, and A132230. %Y A073102 Cf. A073085. %K A073102 easy,nonn %O A073102 1,1 %A A073102 _Zak Seidov_ Aug 24 2002 %E A073102 Extended by _Ray Chandler_, Apr 29 2010