generate_psp_from_primorials.sf 329 B

1234567891011121314151617
  1. #!/usr/bin/ruby
  2. # Most of these pseudoprimes are also super-pseudoprimes.
  3. var min = 2**64
  4. for k in (1..100), n in (1..100) {
  5. #next if (k<=200 && n<=200)
  6. var t = (k*n.pn_primorial + 1)
  7. if (t.is_prob_prime) {
  8. var w = (t * ((t-1)*2 + 1))
  9. if (w > min && w.is_psp) {
  10. say w
  11. }
  12. }
  13. }