Nothing
new_nop = function() {
new("nop")
}
#' @rdname nop
#' @export
nop = make_operation("nop", new_nop)
# operation application ---------------------------------------------------
setMethod("apply_operation", signature(operation = "nop"), function(operation, layers) {
layers
})
# operation multiplication ------------------------------------------------
#' @rdname operation_product
#' @export
setMethod("*", signature(e1 = "nop", e2 = "nop"), function(e1, e2) e1)
#' @rdname operation_product
#' @export
setMethod("*", signature(e1 = "operation", e2 = "nop"), function(e1, e2) e1)
#' @rdname operation_product
#' @export
setMethod("*", signature(e1 = "operation_sum", e2 = "nop"), function(e1, e2) e1)
#' @rdname operation_product
#' @export
setMethod("*", signature(e1 = "nop", e2 = "operation"), function(e1, e2) e2)
#' @rdname operation_product
#' @export
setMethod("*", signature(e1 = "nop", e2 = "operation_sum"), function(e1, e2) e2)
# printing ----------------------------------------------------------------
#' @rdname operation-class
#' @export
setMethod("format", signature(x = "nop"), function(x, ...) {
"1"
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.