Extracto R quadrado de LM em R

pull(glance(data), r.squared)
Successful Salmon