Através da seguinte condição: ifelse(??, 1, Z/(1+1)) O que colocar no lugar de "??" para que o R entenda que quando i=j na matriz Z, quero que se atribua o valor 1?