R/utils.R

In cloudyr/aws.ml: Package Template for 'the cloudyr project'

Defines functions get_modelid get_modelid.default get_modelid.character get_modelid.aws_ml_model

get_modelid <- function(x) {
    UseMethod("get_modelid")
}

get_modelid.default <- function(x) {
    x
}

get_modelid.character <- function(x) {
    x
}

get_modelid.aws_ml_model <- function(x) {
    x$MLModelId
}