Displaying 1 result from an estimated 1 matches for "modality1".
Did you mean:
modality
2013 Mar 05
0
Agreement and Consistency of 2D data
...istency here?
# modality 1
lgemtx <- as.matrix(read.table('
http://cluster010.ovh.net/~myvideoc/R20130305/lge_mtx.csv'))
# modality 2
petmtx <- as.matrix(read.table('
http://cluster010.ovh.net/~myvideoc/R20130305/pet_mtx.csv'))
# ICC
# note: modalities are inverse
# thus in modality1 "0" denotes a normal segment and "100" a complete
infarction of the segment
# and vice versa in modality2
library(irr)
print(icc(cbind(100 - c(pet_mtx), c(lge_mtx)), model="twoway", type="c"))
print(icc(cbind(100 - c(pet_mtx), c(lge_mtx)), model="twoway&...