Espero vetorizar o seguinte loop:

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

Eu pensei que poderia fazertemp_mat=min(temp_mat,1), mas isso não está me dando o resultado desejado. Existe uma maneira de vetorizar esse loop para torná-lo muito mais rápido?