Buenas noches Colegas
Tengo un error, que considero es de lectura (introducción de datos), y no
doy en que me estoy equivocando, asà que solicito su ayuda.
Tengo el siguiente código:
mtzbin <- matrix(0,39,48,byrow = T)
vec <- 0
datIn <- read.table('dato.csv', sep = ',', as.is = T)
sma <- rowSums(ms, 1)
sr <- max(sma)
for(i in 1:39) {
for(j in 1:48) {
vec <- datIn[i, j]
# mtzbin[i, j] <- ((vec/sma[j])^vec)*((1-
vec/sma[j])^(sma[j]-vec))*choose((sr-1),(vec-1))
mtzbin[i, j] <-
((vec/sma)^vec)*((1-vec/sma)^(sma-vec))*choose((sr-1),(vec-1))
}
}
He puesto dos asignaciones para mtzbin[i, j] porque las dos me conducen a
que Rstudio me marca error; en el primer caso me indica:
Error in vec/sma[i] : argumento no-numérico para operador binario
y en el segundo marca:
Error in mtzbin[i, j] <- ((vec/sma)^vec) * ((1 - vec/sma)^(sma - vec)) * :
número de items para para sustituir no es un múltiplo de la longitud del
reemplazo
Interpreto que se trata de un error de lectura puesto que indica que es sma
el 'común denominador'.
Alguien me podrÃa decir donde está mi error; por supuesto adelanto mis más
cumplidas gracias.
Atentamente;
*MANOLO MÃRQUEZ P.*
[[alternative HTML version deleted]]