A238527 Prime values of A238525.
2, 3, 3, 5, 5, 7, 2, 2, 5, 11, 2, 5, 11, 17, 7, 7, 7, 2, 11, 7, 13, 29, 11, 11, 2, 5, 17, 7, 5, 2, 19, 41, 23, 3, 11, 11, 23, 5, 2, 2, 2, 31, 7, 3, 17, 3, 23, 11, 59, 19, 5, 2, 37, 3, 41, 23, 71, 11, 2, 11, 47, 11, 29, 13, 13, 2, 31, 5, 5, 53, 17, 19, 13, 61, 23, 101, 19, 29, 41, 23, 107, 67, 11, 3, 3, 47, 73, 2, 3, 17
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Select[Table[Mod[n, Plus @@ Times @@@ FactorInteger[n]], {n, 2, 300}], PrimeQ] (* Amiram Eldar, May 17 2021 *)