Defininge the matrix A

A <- matrix(c(2, 3, 0, 2, 1, 0, 1, 1, 1, 2, 0, 0, 1, 2, 3, 0, 1, 2, 1, 0, 0, 0, 0, 1, 2), nrow = 5, byrow = TRUE)

Calculate the determinant of A

det_A <- det(A)

Print the result

cat(“Determinant of matrix A:”, det_A, “”)

Determinant of matrix A: 2