[R-es] Nueva consulta

tabla <- read.csv("http://www.hofroe.net/stat557/data/crab.txt", 
header=T, sep="\t")

dimnames(tabla)[[2]] = c("color" ,"spine" ,"width" ,"satell","weight")

names(tabla)

(tabla$satell.bin = ifelse(tabla$satell > 0, 1, 0))

tabla[1:5,]

Estimado Manuel Máquez

¿Que pasa si cambias tabla$satell.bin?

Algo como

datos <- ifelse (tabla$satell > 0, 1, 0))

Javier Marcuzzi


El 28 de mayo de 2013 14:45, Manuel Máquez <manuelmx11 en gmail.com> escribió:

Hola buenas tardes:
Vuelvo a solicitar su ayuda porque no puedo saber que pasa. Estoy usando el
documento 'Regresión Logística Categor/Tema 4 Cate.pdf como guía y el
ejemplo que ustedes conocen de los cangrejos (crab.txt).
Cargo los datos, los guardo en un data frame llamado tabla; al pedir
tabla[1:5,] obtengo:
  color spine width satell weight
1  3       3       28.3     8      3050
2  4       3       22.5     0      1550
3  2       1       24.0     9      2300
4  4       3       24.8     0      2100
5  4       3       26.0     4      2600
Se desea discretizar satell para tener 1 si tiene concubinos y 0 para
cuando no los hay y el documento dice se use:
(tabla$satell.bin=ifelse (tabla$satell > 0, 1, 0))
pero la Pc reporta:
Error en '$<-.data.frame'('*tmp*',"satell.bin", value = logical(0)):
replacement has 0 rows, data has 173.
La pregunta es ¿el documento esta mal?  o existe alguna otra manera de
discretizar.
Gracias anticipadas.



*MANOLO MÁRQUEZ P.*

        [[alternative HTML version deleted]]

	[[alternative HTML version deleted]]