Add regression lines to a plot

Source: R/bothlines.R

Add the regression lines of \(y\) on \(x\) AND \(x\) on \(y\) to the plot. Optionally add the line obtained by allowing errors in both variables (Deming regression).

bothlines(x, y, Dem = FALSE, sdr = 1, col = "black", ...)

Arguments

x

Numeric vector

y

Numeric vector

Dem

Logical. Should the Deming regression line be added too?

sdr

Numeric. The assumed ratio of standard deviations used in the Deming regression.

col

Colour of the lines. Can be a vector of up to 3 elements, one for each line.

...

Additional arguments passed on to abline, which does the actual plotting.

Value

None.

See also

abline.

Author

Bendix Carstensen, Steno Diabetes Center, https://BendixCarstensen.com

Examples


data( ox )
oxw <- to.wide(ox)
attach( oxw )
plot( CO, pulse )
abline(0,1)
bothlines( CO, pulse, Dem=TRUE, col=rainbow(3), lwd=2 )

plot( CO, pulse,pch=16 )
abline(0,1, col=gray(0.7), lwd=2)
bothlines( CO, pulse, Dem=TRUE, col=c(rep("transparent",2),"black"), lwd=2 )