|
|
|
|
#14 by Charles R Greathouse IV at Thu Sep 08 08:45:48 EDT 2022
|
| PROG
|
(MAGMAMagma) [ p: p in PrimesUpTo(740) | p mod 13 in {2, 3, 5, 7, 11} ]; // Klaus Brockhaus, Oct 28 2009
|
|
|
Discussion
|
Thu Sep 08
| 08:45
| OEIS Server: https://oeis.org/edit/global/2944
|
|
|
|
#13 by Joerg Arndt at Sat Jun 04 11:08:59 EDT 2016
|
|
|
|
#12 by Michel Marcus at Sat Jun 04 10:37:26 EDT 2016
|
|
|
|
#11 by Michel Marcus at Sat Jun 04 10:37:08 EDT 2016
|
| PROG
|
(PARI) {forprime(p=2, 740, if(isprime(p%13), print1(p, ", ")))} [From , ", ")))} \\ _Klaus Brockhaus, _, Oct 28 2009]
(MAGMA) [ p: p in PrimesUpTo(740) | p mod 13 in {2, 3, 5, 7, 11} ]; [From } ]; // _Klaus Brockhaus, _, Oct 28 2009]
|
| EXTENSIONS
|
Edited by _Klaus Brockhaus _ and _R. J. Mathar, _, Oct 28 2009 and Oct 29 2009
|
| STATUS
|
proposed
editing
|
|
|
Discussion
|
Sat Jun 04
| 10:37
| Michel Marcus: well ...
|
|
|
|
#10 by G. C. Greubel at Sat Jun 04 10:24:38 EDT 2016
|
|
|
|
#9 by G. C. Greubel at Sat Jun 04 10:24:31 EDT 2016
|
|
|
|
#8 by Joerg Arndt at Sun Aug 05 08:02:57 EDT 2012
|
|
|
|
#7 by Vincenzo Librandi at Sun Aug 05 01:40:35 EDT 2012
|
|
|
|
#6 by Vincenzo Librandi at Sun Aug 05 01:40:26 EDT 2012
|
| LINKS
|
Vincenzo Librandi, <a href="/A167119/b167119.txt">Table of n, a(n) for n = 1..1000</a>
|
| MATHEMATICA
|
Select[Prime[Range[4000]], MemberQ[{2, 3, 5, 7, 11}, Mod[#, 13]]&] (* Vincenzo Librandi, Aug 05 2012 *)
|
| KEYWORD
|
nonn,easy
|
| STATUS
|
approved
editing
|
|
|
|
#5 by Russ Cox at Sat Mar 31 12:38:27 EDT 2012
|
| AUTHOR
|
_Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), _, Oct 27 2009
|
|
|
Discussion
|
Sat Mar 31
| 12:38
| OEIS Server: https://oeis.org/edit/global/876
|
|
|
|