[R-es] seleccionar datos

[José Miguel Contreras García]

Tengo un problemilla, aparentamente tonto pero no logro resolverlo.

Imaginaros que teneis:

1007 2 6 2 3 2 1 6 1100 1300 650
1007 2 6 3 2 2 1 6 200 1300 650
1058 1 1 2 3 1 1 6 2000 2000 2000
1438 1 1 2 5 1 1 6 300 300 300
1451 1 1 2 3 1 1 6 1747 1747 1747
1670 2 1 2 5 1 1 6 750 1185 592.5
1670 2 6 2 4 1 1 6 435 1185 592.5
1808 2 1 1 5 1 1 6 480 690 345
1808 2 6 1 5 1 1 6 210 690 345
1994 1 1 1 4 1 1 6 650 650 650

Como veis se repite el primer elemento de algunas columnas, pues quiero
hacer un bucle que me cree una tabla con solo la 1ª fila para cada valor
que se repite, es decir que quede:


1007 2 6 2 3 2 1 6 1100 1300 650
1058 1 1 2 3 1 1 6 2000 2000 2000
1438 1 1 2 5 1 1 6 300 300 300
1451 1 1 2 3 1 1 6 1747 1747 1747
1670 2 1 2 5 1 1 6 750 1185 592.5
1808 2 1 1 5 1 1 6 480 690 345
1994 1 1 1 4 1 1 6 650 650 650

Lo estoy intentando con

for (i in 1:m) {
levels(factor(hog[,1]))->kk
write.table(kk, file="kk.txt",append=TRUE,row.names=FALSE,col.names=FALSE,
quote = FALSE)
}


o con


for (j in 1:m-1){ subset (hog, hog[j,1]!=hog[j+1,1])-> hog2
		write.table(hog2,
file="hog2.txt",append=TRUE,row.names=FALSE,col.names=FALSE, quote =
FALSE)
			}
as.matrix(read.table("hog2.txt"))->hog2



pero nada.

Gracias
-- 
                             \|||/
                             (o o)
+-----------------------oOOo-(_)-oOOo------------------------------+
| José Miguel Contreras                                            |

| e-mail: jmcontreras en ugr.es                                       |
|                                                |
+----------------------oooO-------Oooo-----------------------------+