create confusion matrix in r without library code example

Example: how to make confusion matrix in r

library(caret)
confusionMatrix(data = your_prediction, 
                        reference = data$y)