powered by
CalcRepeatability(ID, ind.data)
num.ind = length(iris[,1]) ID = rep(1:num.ind, 2) ind.data = rbind(iris[,1:4], iris[,1:4]+array(rnorm(num.ind*4, 0, 0.1), dim(iris[,1:4]))) CalcRepeatability(ID, ind.data)
Run the code above in your browser using DataLab