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 A267481 #4 Jan 15 2016 20:44:46 %S A267481 2,5,7,19,31,41,47,59,67,71,97,101,103,107,109,113,131,149,157,163, %T A267481 173,191,193,211,227,233,257,281,283,293,307,311,317,349,359,373,379, %U A267481 397,419,421,431,439,443,467,479,503,521,541,547,563,577,593,599,607,617,653,659,661,683 %N A267481 Primes which are squares (mod 31). %o A267481 (PARI) select(p->issquare(Mod(p,31))&&isprime(p),[1..1000]) \\ This is to provide a generic characteristic function as 1st arg of select(), there are other ways to produce the sequence more efficiently. - _M. F. Hasler_, Jan 15 2016 %Y A267481 Cf. A191040. %K A267481 nonn %O A267481 1,1 %A A267481 _M. F. Hasler_, Jan 15 2016