R/rotateMatrix180.r

In jrminter/rXEDS: Process X-ray EDS spectra from NIST DTSA-II and data cubes from NIST Lispix.

#' rotate180.matrix
#' 
#' Rotate a matrix 180 degrees clockwise.
#' 
#' From http://www1.maths.lth.se/help/R/image/
#'
#' @param x The input matrix.
#'
#' @return The rotated matrix
#'
#' @keywords keywords
#'
#' @export
rotate180.matrix <- function(x) { 
  xx <- rev(x)
  dim(xx) <- dim(x)
  return(xx)
}