# Create two 2x3 matrices.

matrix1 <- matrix(c(3, 9, -1, 4, 2, 6), nrow = 2)

print(matrix1)

​

matrix2 <- matrix(c(5, 2, 0, 9, 3, 4), nrow = 2)

print(matrix2)

​

# Multiply the matrices.

result <- matrix1 * matrix2

cat("Result of multiplication","\n")

print(result)

​

# Divide the matrices

result <- matrix1 / matrix2

cat("Result of division","\n")

print(result)

​