powered by
data(pear)
pesticide
comp
ss
lod
items
state
origin
year
month
day
site
lab
variety
data(pear) these <- pear$pesticide == pear$pesticide[1] r <- cor(pear$comp[these], pear$ss[these]) cor2icc(r, 10, "not")
Run the code above in your browser using DataLab