Exercise

Exercise C23

#Defining the matrix
matrix_B <- matrix(c(1, 3, 2, 4, 1, 3, 1, 0, 1), nrow = 3, byrow = TRUE)

#Determinant
determinant_B <- det(matrix_B)

#Display result
print(determinant_B)
## [1] -4
LS0tDQp0aXRsZTogIkRpc2N1c3Npb24gMiINCmF1dGhvcjogIkxhdXJhIFB1ZWJsYSINCmRhdGU6ICJgciBTeXMuRGF0ZSgpYCINCm91dHB1dDogb3BlbmludHJvOjpsYWJfcmVwb3J0DQotLS0NCg0KIyMjIEV4ZXJjaXNlIA0KDQpFeGVyY2lzZSBDMjMNCg0KYGBge3J9DQojRGVmaW5pbmcgdGhlIG1hdHJpeA0KbWF0cml4X0IgPC0gbWF0cml4KGMoMSwgMywgMiwgNCwgMSwgMywgMSwgMCwgMSksIG5yb3cgPSAzLCBieXJvdyA9IFRSVUUpDQoNCiNEZXRlcm1pbmFudA0KZGV0ZXJtaW5hbnRfQiA8LSBkZXQobWF0cml4X0IpDQoNCiNEaXNwbGF5IHJlc3VsdA0KcHJpbnQoZGV0ZXJtaW5hbnRfQikNCg0KDQpgYGANCg0KDQoNCg==