Off topic:the meanig of R script "%*%"

Question

[cfarmeri]

When working with R,　i dont understant "%*%" code. For example,

-------------

data <- read.table(input_f, header=TRUE, row.names=1, sep="\t", quote="")

data.pca <- prcomp(t(data))

data.pca.sample <- t(data) %*% data.pca$rotation[,1:2]

-------------

I want to get PCA by R script including the coding above.

Please advice me.