residual function in r code example

Example: residual plot in r

lm_Model = lm(y ~ x, data=df) 
  Model.res = resid(lm_Model)

  plot(df$x, Model.res, ylab="Residuals", xlab="DC Power (W)")+ 
  abline(0, 0)