Talk:Wilson primes of order n

From Rosetta Code
Revision as of 22:51, 28 July 2021 by rosettacode>Gerard Schildberger (added a new talk discussion.)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

computation for higher orders of Wilson primes

Just for the fun of it,   I extended the   orders   to   101   to see what Wilson primes would be generated   (using the REXX program):

 order │ Wilson primes  P  of order  1  ──►  101,  where  P <  11,000
───────┼──────────────────────────────────────────────────────────────
   1   │   5   13   563
   2   │   2   3   11   107   4,931
   3   │   7
   4   │   10,429
   5   │   5   7   47
   6   │   11
   7   │   17
   8   │        (none found within the range specified)
   9   │   541
  10   │   11   1,109
  11   │   17   2,713
  12   │        (none found within the range specified)
  13   │   13
  14   │        (none found within the range specified)
  15   │   349
  16   │   31
  17   │   61   251   479
  18   │        (none found within the range specified)
  19   │   71
  20   │   59   499
  21   │        (none found within the range specified)
  22   │        (none found within the range specified)
  23   │        (none found within the range specified)
  24   │   47   3,163
  25   │        (none found within the range specified)
  26   │        (none found within the range specified)
  27   │   53
  28   │   347
  29   │        (none found within the range specified)
  30   │   137   1,109   5,179
  31   │        (none found within the range specified)
  32   │   71
  33   │   823   1,181   2,927
  34   │   149
  35   │   71
  36   │        (none found within the range specified)
  37   │   71   1,889
  38   │        (none found within the range specified)
  39   │   491
  40   │   59   71   1,171
  41   │   977   9,623
  42   │        (none found within the range specified)
  43   │   47
  44   │   3,307
  45   │   61
  46   │        (none found within the range specified)
  47   │        (none found within the range specified)
  48   │        (none found within the range specified)
  49   │   149   941
  50   │        (none found within the range specified)
  51   │        (none found within the range specified)
  52   │        (none found within the range specified)
  53   │   71
  54   │   2,887
  55   │   137
  56   │        (none found within the range specified)
  57   │   467
  58   │   443   4,937
  59   │        (none found within the range specified)
  60   │        (none found within the range specified)
  61   │   2,887   9,479
  62   │        (none found within the range specified)
  63   │   173
  64   │        (none found within the range specified)
  65   │   1,013   10,163
  66   │        (none found within the range specified)
  67   │   523
  68   │   373
  69   │   2,341   9,011
  70   │   359   499   821   8,693
  71   │   409   10,903
  72   │        (none found within the range specified)
  73   │   5,651
  74   │   7,993
  75   │        (none found within the range specified)
  76   │   419
  77   │        (none found within the range specified)
  78   │   227   3,191
  79   │        (none found within the range specified)
  80   │        (none found within the range specified)
  81   │   173
  82   │        (none found within the range specified)
  83   │   137
  84   │        (none found within the range specified)
  85   │   983
  86   │        (none found within the range specified)
  87   │        (none found within the range specified)
  88   │   859
  89   │        (none found within the range specified)
  90   │   2,267
  91   │        (none found within the range specified)
  92   │   1,489
  93   │   173
  94   │        (none found within the range specified)
  95   │        (none found within the range specified)
  96   │        (none found within the range specified)
  97   │        (none found within the range specified)
  98   │        (none found within the range specified)
  99   │        (none found within the range specified)
  100  │   4,201
  101  │   149
───────┴───────────────────────────────────────────────────────────────

-- Gerard Schildberger (talk) 22:48, 28 July 2021 (UTC)