Re: select vector names

[David L Lorenz <lorenz@usgs.gov>]

Martijn,
  The hmisc library contains a
function sedit() that will remove the =n part. Then use the unique() function
to get the unique names in the vector.  Like this:

Vect <- c("FA",
"WLV=2", "WLV=3", "WLV=4", "TS",
"BAE", "BH", "WKZ", "RDQB", "gr=1",
"gr=2", "gr=3", "gr=4", "gr=5",
"gr=6", "gr=7")
library(hmisc)
unique(sedit(Vect, "=*",
""))

Dave

"Heymans, MW" <mw.heymans@vumc.nl>
Sent by: s-news-owner@lists.biostat.wustl.edu

05/10/2006 07:04 PM

To	"s-news" <s-news@lists.biostat.wustl.edu>
cc
Subject	[S] select vector names

Dear all,
 
I have this vector of names:
[1] "FA"    "WLV=2"
"WLV=3" "WLV=4" "TS"    "BAE"
  "BH"    "WKZ"   "RDQB"
 "gr=1"  "gr=2"  "gr=3"  "gr=4"
 "gr=5"  "gr=6" 
[16] "gr=7"

and I want to change it to (same order, but without the factor extensions):

[1] "FA" "WLV" "TS"    "BAE"   "BH"    "WKZ"   "RDQB"  "gr"  

help is appreciated (I got stuck in the regexpr functions).
 
regards, Martijn