OFFSET
1,1
REFERENCES
Originally published on Nov 09 2004 by indiejade(AT)gmail.com
FORMULA
EXAMPLE
2 * 2! = 4, 3 * 3! = 18, 5 * 5! = 600.
MATHEMATICA
Array[Prime[#] Prime[#]! &, 13] (* Michael De Vlieger, Aug 04 2015 *)
#*#!&/@Prime[Range[15]] (* Harvey P. Dale, Sep 21 2024 *)
PROG
(Magma) [p*Factorial(p): p in PrimesUpTo(50)]; // Vincenzo Librandi, Jun 09 2013
(Python)
from sympy import factorial, prime
def a(n): p = prime(n); return p * factorial(p)
print([a(n) for n in range(1, 14)]) # Michael S. Branicky, Apr 18 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
L. Shawnee Cook (shawneecook(AT)gmail.com), Feb 17 2006
STATUS
approved