omxQuotes

Description:

omxQuotes pastes quotation marks ("") around its argument.

Usage:

omxQuotes(name)

Arguements:

name:

a character vector to insert quotation marks around.

Example:

:

modelName <- flatModel@name
object <- flatModel[[threshName]]
if (is.null(object)) {
    stop(paste("The thresholds matrix/algebra", omxQuotes(threshName), 
            "for model", omxQuotes(modelName), 
            "does not exist."), call. = FALSE)
}