Ekstrak r kuadrat dari lm di r

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