sp1 <- corRRatio(form = ~ x + y + z)
spatDat <- data.frame(x = (0:4)/4, y = (0:4)/4)
cs1Ratio <- corRRatio(1, form = ~ x + y)
cs1Ratio <- Initialize(cs1Ratio, spatDat)
corMatrix(cs1Ratio)
cs2Ratio <- corRRatio(1, form = ~ x + y, metric = "man")
cs2Ratio <- Initialize(cs2Ratio, spatDat)
corMatrix(cs2Ratio)
Run the code above in your browser using DataLab