[cem] Error in FUN(c(1L, 0L)[[1L]], ...) : subscript out of bounds