m1 <- matrix(c(17, 24, 1, 8, 15,
23, 5, 7, 14, 16,
4, 6, 13, 20, 22,
10, 12, 19, 21, 3,
11, 18, 25, 2, 9), 5, 5, byrow = TRUE)
m2 <- matrix(c(8, 1, 6,
3, 5, 7,
4, 9, 2), 3, 3, byrow = TRUE)
R <- xcorr2(m1, m2)
Run the code above in your browser using DataLab