orig <- c(1:10, 0, 0)
pert <- orig; pert[c(1, 5, 7)] <- c(0, 6, 9)
# ignore empty cells when computing measures `d1`, `d2`, `d3`
ck_cnt_measures(orig = orig, pert = pert, exclude_zeros = TRUE)
# use all cells
ck_cnt_measures(orig = orig, pert = pert, exclude_zeros = FALSE)
# for an application on a perturbed object, see ?cellkey_pkg
Run the code above in your browser using DataLab