coi_um.R: fix typo (!= -> ==)
coi_um.R: fix another small problem