Hola Leonardo,

Podrias intentar:

# datos
x <- structure(list(V1 = c("PC DELL P4 3.0 GHZ 512MB 150GB CD FDD LA",
"PC LTEL Celeron 1.7 GHz", "PC CEL 1.8 ASUS P5GC-DDR2 1/320GB/DVDRW",
"PC INTEL PENTIUM 4 CPU 2.40Ghz 512MB RAM", "PC Founder P IV 2.8 GHz 80
GB",
"Monitor ACER VIEW", "Monitor SUN 15¨", "COMPUTADORA P4/2.8GHZ"
)), .Names = "V1", row.names = c(NA, -8L), class = "data.frame")

# resultados
sapply(with(xx, strsplit(V1, ' ')), "[", 1)
[1] "PC"          "PC"          "PC"          "PC"          "PC"
"Monitor"
[7] "Monitor"     "COMPUTADORA"

Saludos,
Jorge.-


2012/7/5 Leonardo Hernández Pérez <>

>  Tengo una columna con estos datos
>
> PC DELL P4 3.0 GHZ 512MB 150GB CD FDD LA
> PC LTEL Celeron 1.7 GHz
> PC CEL 1.8 ASUS P5GC-DDR2 1/320GB/DVDRW
> PC INTEL PENTIUM 4 CPU 2.40Ghz 512MB RAM
> PC Founder P IV 2.8 GHz 80 GB
> Monitor ACER VIEW
> Monitor SUN 15¨
> COMPUTADORA P4/2.8GHZ
> Necesito extraer la primera palabra, lo cual quedaría:
>
> PC
> PC
> PC
> PC
> Monitor
> Monitor
> COMPUTADORA
> ¿Cómo Hacerlo?
>
> ---
> This message was processed by Kaspersky Mail Gateway 5.6.28/RELEASE
> running at host imx2.etecsa.cu
> Visit our web-site: <http://www.kaspersky.com>, <http://www.viruslist.com>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>

	[[alternative HTML version deleted]]

