#' mirrorMatrix
#'
#' From http://www1.maths.lth.se/help/R/image/
#'
#' @param x input matrix.
#'
#' @return The mirrored matrix
#'
#' @keywords keywords
#'
#' @export
mirrorMatrix <- function(x) {
xx <- as.data.frame(x)
xx <- rev(xx)
xx <- as.matrix(xx)
return(xx)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.