`IC` <- function(object)UseMethod("IC")