You should try using the cor function.
Also your regression formula might be off.
Try:
data <- lm(V1 ~ V2+V3+V4+V5, data = pagesize_table)
Also, make sure to use variable selection techniques like backwards eliminate
In addition, try glm instead of lm
Furthermore, much like the sight, cross validate your final model using another method like forward selection or BIC.