(54)^(45)-56 # b 23-1(8-12) # c 56/8(3+4) # d 45-5*8+(8+9)
a <- c(2, 5, 6, 7) b <- c(1, 0, 9, 8) c <- c(6, 5, 8, 3)
matrix_Z <- matrix(c(a, b, c), byrow = TRUE, nrow = 3) matrix_Z Column_title <- c(“Mon”, “Tue”, “Wed”, “Thu”) Row_title <- c(“Present”, “Absent”, “On Leave”) colnames(matrix_Z) <- Column_title rownames(matrix_Z) <- Row_title matrix_Z rowSums(matrix_Z) colSums(matrix_Z)