130 Composites with prime repunit property -- v2.sf 476 B

1234567891011121314151617181920
  1. #!/usr/bin/ruby
  2. # Daniel "Trizen" Șuteu
  3. # Date: 21 September 2019
  4. # https://github.com/trizen
  5. # https://projecteuler.net/problem=130
  6. # Runtime: 0.389s
  7. # Deceptive nonprimes are composite numbers n that are coprime to 30, satisfying 10^(n-1) == 1 (mod n).
  8. # See also:
  9. # https://oeis.org/A000864
  10. 2..Inf -> lazy.grep {|n| n.is_composite }\
  11. .grep {|n| n.is_coprime(30) }\
  12. .grep {|n| powmod(10, n-1, n) == 1 }\
  13. .first(25).sum.say