Performing multiple regression models with the use of sparse Matrix of class “dgCMatrix” data simultaneously in R

Question

I\'m trying to calculate Variance Inflation Factor (VIF) in R. I use the following code

library(readxl)
data <-read_excel("data.xlsx&quo