вычислить расстояние между линией регрессии и точкой данных

Интересно, есть ли способ вычислить расстояние между линией на графике и точкой данных? Например, каково расстояние между концентрацией == 40 с сигналом == 643 (элемент 5) и аблайном?

concentration <- c(1,10,20,30,40,50)
signal <- c(4, 22, 44, 244, 643, 1102)
plot(concentration, signal)
res <- lm(signal ~ concentration)
abline(res)