[R-es] Error lectura

Se trata de una matriz en donde se van sumando las apariciones del
fenómeno; te mando dicha matriz y el código que la genera:
    for(j in 1:39) {                      # Elemento
        da <- dt[i ,j]                    # Dato
        if(da == 0) {next
            }else{
            mc[j, da] <- mc[j, da] + 1
            ms[j, da] <- ms[j, da] + da
            it <- da/mc[j, da]
            mp[j, da] <- it
        }
    }
*?Gracias.?*
*MANOLO MÁRQUEZ P.*