How can I assess the accuracy of the matrix factorization recommender system using crossvalidation?

Question

I would like to access my model using cross-validation, but I am failing to fit it into this code.

accuracy <- function(x, real_ratings){
#user and book fa