Getting cumulative proportion in pca

I want to retrive the cumulative proportion of explained variance after a pca in R. summary(pca) returns this result in its last row, but how can I extract this row? summary(prcomp(USArrests, scal...