Vectorize min () para matriz

Espero vectorizar el siguiente ciclo:

for (i in 1:n) {
    for (j in 1:m) {
        temp_mat[i,j]=min(temp_mat[i,j],1);
    }
}  

Pensé que podía hacertemp_mat=min(temp_mat,1), pero esto no me está dando el resultado deseado. ¿Hay alguna forma de vectorizar este ciclo para hacerlo mucho más rápido?

Respuestas a la pregunta(2)

Su respuesta a la pregunta