Hi All:
Has anyone used the function agreementplot in the vcd package? Now I want
to put more than 1 plots on a single device. I tried
par(mfrow), split.screen() and layout(), but with no luck. Below is a
sample code.
mydata <- data.frame(rater1=sample(1:2, 10, replace=T),
rater2=sample(1:2, 10, replace=T),
rater3=sample(1:2, 10, replace=T))
# want to put these 3 plots on a single device
agreementplot(table(mydata$rater1, mydata$rater2))
agreementplot(table(mydata$rater1, mydata$rater3))
agreementplot(table(mydata$rater2,
mydata$rater3))
Could anyone help me with this? Thanks a lot in advance.
FD
[[alternative HTML version deleted]]