A262398 a(n) = prime(n)! mod prime(n!).
0, 0, 3, 56, 511, 194, 46976, 104633, 546681, 41130177, 643108140, 7034542959, 65748733699, 1518781632657, 35097481516962, 396029533782911, 4146710666095789, 159899356955923308, 3662069108121609141, 109629928744379590001, 828180977946159463007
Offset: 1
Keywords
Examples
a(1) = prime(1)! mod prime(1!) = 2 mod 2 = 0. a(2) = prime(2)! mod prime(2!) = 6 mod 3 = 0. a(3) = prime(3)! mod prime(3!) = 120 mod 13 = 3.
Programs
-
Magma
[Factorial(NthPrime(n)) mod NthPrime(Factorial(n)): n in [1..11]]; // Vincenzo Librandi, Sep 23 2015
-
Mathematica
Table[Mod[Prime[n]!, Prime[n!]], {n, 15}] (* Michael De Vlieger, Sep 21 2015 *)
-
PARI
a(n) = prime(n)! % prime(n!); vector(11, n, a(n))
Extensions
a(11)-a(15) from Michael De Vlieger, Sep 21 2015
Comments