Hola,
Hay un primer error en la forma en la que grabas el csv.
Tienes que indicar que no te ponga nombres a las filas...
Y al leer el csv, tienes que indicar que hay cabecera.
write.csv(ms, file = 'dato.csv', *row.names = FALSE*)
datIn <- read.table('dato.csv', sep = ',', as.is = T, *header = TRU
Los datos originales están Tdist.csv que adjunto, el código es:
mc <- matrix(0,39,48,byrow = T) # Matriz Cta
mp <- matrix(0,39,48,byrow = T) # Matriz Pr
ms <- matrix(0,39,48,byrow = T) # Matriz Sumas
mtzbin <- matrix(0,39,48,byrow = T) # Matriz Binom
vec <- 0
Disculpa, pero no me entero..
Si puedes volver a explicar el problema que tienes y los datos que aplican
para poder reproducirlo...
Gracias,
Carlos Ortega
www.qualityexcellence.es
El 8 de septiembre de 2017, 20:37, Manuel Máquez
escribió:
> No exactamente, pues en esa tabla se consignan los dat
No exactamente, pues en esa tabla se consignan los datos originales y cada
registro tiene sólo 7 diferentes de cero; por ello se hace la suma por
separado.
*MANOLO MÁRQUEZ P.*
[[alternative HTML version deleted]]
___
R-help-es mailing list
R-
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] <- m
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[
Carlos, muchas gracias por la rapidez de tu respuesta; claro que sí, te
adjunto los datos.
Nuevamente muchas gracias.
Atentamente;
*MANOLO MÁRQUEZ P.*
"","V1","V2","V3","V4","V5","V6","V7","V8","V9","V10","V11","V12","V13","V14","V15","V16","V17","V18","V19","V20","V21","V22","V23","V24","V25","V26
Si no envías un conjunto de datos con el que se pueda reproducir
Saludos,
Carlos Ortega
www.qualityexcellence.es
El 8 de septiembre de 2017, 8:34, Manuel Máquez
escribió:
> Buenas noches Colegas
> Tengo un error, que considero es de lectura (introducción de datos), y no
> doy en que me esto