R/r.R

In bmsasilva/soundClass: Sound Classification Using Convolutional Neural Networks

#' Rotate a matrix counter clockwise
#' @title Rotate a matrix
#' @description  Rotate a matrix 90 degrees counter clockwise
#' @param mat a matrix
#' @usage r(mat)
#' @return Rotated matrix
#' @author Bruno Silva
#' @keywords internal
#' @noRd

r <- function(mat) apply(mat, 1, rev)