I figured it out: x<-sub("^.*:([[:digit:]]+)..([[:digit:]]+).*", "\\1 \\2", CTSS$V4) -- View this message in context: http://r.789695.n4.nabble.com/extract-data-from-a-column-tp3609890p3610147.html Sent from the R help mailing list archive at Nabble.com.