plot.RI.R2.result {hettx}

Make a plot of the treatment effect R2 estimates

Description

Make a plot of the treatment effect R2 estimates

Usage

## S3 method for class 'RI.R2.result'
plot(
  x,
  main = paste("R2 for Het Tx (", x$type, ")", sep = ""),
  ADD = FALSE,
  ...
)

Arguments

x

Results from est.beta, etc.

main

Title for plot

ADD

TRUE if add to existing plot. FALSE make a new plot.

...

Arguments to pass to plotting of points.

See Also

calc.beta

Examples

df <- make.randomized.dat( 1000, gamma.vec=c(1,1,1,2), beta.vec=c(-1,-1,1,0) )
es <- estimate_systematic( Yobs ~ Z,  interaction.formula = ~ A + B, data = df )
r2_out <- R2(es)
plot(r2_out)