Run »
thismatrix <- matrix(c("apple", "banana", "cherry", "orange"), nrow = 2, ncol = 2) dim(thismatrix)
[1] 2 2