I shall generate random numbers.

    x <- rnorm(1000)

And I shall summarize them.

    summary(x)

    ##     Min.  1st Qu.   Median     Mean  3rd Qu.     Max. 
    ## -3.73500 -0.70820 -0.03440 -0.05312  0.66780  3.22000
