Buenos dias Cesar,

Quizas no ando muy bien haciendo aritmetica por estos dias, pero no logro
obtener los mismos resultados para la ultima fila con los datos que envias:

# datos
datos <- read.table(textConnection("sexo  peso edad
F 1.2 33
F 1.3 32
M 1.4 32
M 1.5 32"), header = TRUE)
closeAllConnections()

# sumas interiores
out <- with(datos, tapply(peso, list(sexo, edad), sum))
out[is.na(out)] <- 0

# totales
columna <- with(datos, tapply(peso, sexo, sum))
fila <- with(datos, tapply(peso, edad, sum))

# salida
res <- rbind(cbind(out, columna), c(fila, sum(fila)))
colnames(res) <- c('32','33','TOTAL')
rownames(res) <- c('M','F','TOTAL')
res

Saludos,
                Jorge Ivan Velez



2010/9/2 cesar procopio <>

> Buen dia:
>
> żes posible armar una tabla de contingencia pero que contabilice a cada
> instancia por la variable peso (weight)?ży que me calcule el porcentaje
> sobre el
> total, sobre la fila y sobre la columna?
> La idea es que en lugar que me cuente las instancias me realice una suma (u
> alguna otra funcion) de los valores de otra variable.
> La idea es a partir de la tabla:
> sexo  peso (weight)  edad
> F 1.2 33
> F 1.3 32
> M 1.4 32
> M 1.5 32
>
> Obtener la tabla:
>   32 33 TOTAL
> M 2.9 0 2.9
> F 1.3 1.2 2.5
> TOTAL 2.8 2.6 5.4
>
> De antemano muchas gracias!!!
>
>
>
>        [[alternative HTML version deleted]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>

	[[alternative HTML version deleted]]

