Factorial in Racket

The recursive mathematical definition of factorial is easily represented in Racket:
    (define factorial
      (lambda (n)
        (if (= n 1)
            1
            (* (factorial (- n 1)) n))))