Как пометить плитки в функции mosaicplot ()?

Question

Как изменить маркировку плиток («0», «1»; «3», «4», «5») на моем мозаичном участке?

mosaicplot(table(mtcars[, c("gear","vs")]), 
           col=c("grey","black"), las=1, ylab="ylab", xlab="xlab", main="main")