Skip to content

[R-es] Error lectura

2 messages · Manuel Máquez, Carlos Ortega

#
Carlos, muchas gracias por la rapidez de tu respuesta; claro que sí, te
adjunto los datos.
Nuevamente muchas gracias.
Atentamente;
*MANOLO MÁRQUEZ P.*
------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20170908/4b3d9bbb/attachment.html>
------------ próxima parte ------------
A non-text attachment was scrubbed...
Name: dato.csv
Type: text/csv
Size: 4975 bytes
Desc: no disponible
URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20170908/4b3d9bbb/attachment.csv>
#
En tu código, ¿qué es "ms"?...

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))
    }
}

En los datos no aparece...

Saludos,
Carlos Ortega
www.qualityexcellence.es


El 8 de septiembre de 2017, 18:30, Manuel Máquez <manuelmx11 en gmail.com>
escribió: