Alpha and Lambda selection in Elastin Net in R

Question

I\'m trying to perform Elastic Net in R for 10x15 dataframe named data with the use of the following code

 A <- as.matrix(data)
s