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 A191034 #10 Sep 08 2022 08:45:57 %S A191034 5,11,13,19,23,29,41,43,67,71,103,107,113,127,131,151,157,167,173,197, %T A191034 223,227,229,233,269,271,307,311,317,331,347,349,373,401,409,419,421, %U A191034 431,433,449,457,463,479,503,521,523,577,613,617,631,641,653,661,677 %N A191034 Primes p with Jacobi symbol (p|51) = 1. %C A191034 Originally incorrectly named "primes which are squares (mod 51)", which is subsequence A106904. - M. F. Hasler, Jan 15 2016 %H A191034 Vincenzo Librandi, <a href="/A191034/b191034.txt">Table of n, a(n) for n = 1..1000</a> %t A191034 Select[Prime[Range[200]], JacobiSymbol[#,51]==1&] %o A191034 (Magma) [p: p in PrimesUpTo(677) | JacobiSymbol(p, 51) eq 1]; // _Vincenzo Librandi_, Sep 10 2012 %Y A191034 Cf. A191017, A191018, A191020, A191023, A191025, A191026, A191028, A191029, A191032, A191036, A191037. %K A191034 nonn,easy %O A191034 1,1 %A A191034 _T. D. Noe_, May 24 2011 %E A191034 Definition corrected (following an observation by _David Broadhurst_) by _M. F. Hasler_, Jan 15 2016