ROC with cross-validation for linear regression in R

Question

A two-part question: I\'m trying to figure out:
(1) how to generate a ROC curve for a linear regression using lm() (properly), and
(2) how to do it with k-f