(1)Show that ATA=AAT (
\[ A^TA = AA^T \]
#let's see a 2x2 matrix
A <- matrix(c(1,-1,2,-2), nrow = 2, byrow = TRUE)
A
## [,1] [,2]
## [1,] 1 -1
## [2,] 2 -2
#let's find the tranpose of A, we called it A1
A1 <- t(A)
A1
## [,1] [,2]
## [1,] 1 2
## [2,] -1 -2
# So we want to demonstrate that A1A =
You can also embed plots, for example:
Note that the echo = FALSE
parameter was added to the code chunk to prevent printing of the R code that generated the plot.