Posted on 28th April 2025|495 views
Posted on 28th April 2025| views
Try this
alla$demo <- as.numeric(gsub("\\.", "", alla$demo))
alla$tot <- as.numeric(gsub("\\.", "", alla$tot))
Then test
FIT <- lm(alle$demo~alla$tot)
To see if you get any errors. Then
abline(reg = FIT)