Try
x <- c("Tom Cruiser", "Bread Pett", "Arnold Schwiezer")
sapply(strsplit(x, " "), function(r) paste0(substr(r[1], 1, 3),
substr(r[2], 1, 3)))
[1] "TomCru" "BrePet" "ArnSch"
HTH,
Jorge.-
On Thu, Mar 14, 2013 at 1:21 AM, SH <empti...@gmail.com> wrote:
> What I want to do is to extrac three letters from first and last name
> and to combine them to make another column 'abb'. The column 'abb' is
> to be a my final product. I can make column 'abb' using 'paste'
> function once I have two parts from the first column 'name'.
>
> Thanks,
>
> Steve
>
> On Wed, Mar 13, 2013 at 10:17 AM, Jorge I Velez
> <jorgeivanve...@gmail.com> wrote:
> > Try
> >
> > substr(tempdf$abb 4, 6)
> >
> > --JIV
> >
> >
> >
> > On Thu, Mar 14, 2013 at 1:15 AM, SH <empti...@gmail.com> wrote:
> >>
> >> Dear Jorge,
> >>
> >> I gave me this result (below) since it defines starting from the forth
> >> letter and ending 6th letter from the first element.
> >>
> >> > substr(tempdf$name, 4, 6)
> >> [1] " Cr" "ad " "old"
> >>
> >> I would like to have letters from first and second elements if possible.
> >>
> >> Thanks for replying,
> >>
> >> Steve
> >>
> >>
> >> On Wed, Mar 13, 2013 at 10:10 AM, Jorge I Velez
> >> <jorgeivanve...@gmail.com> wrote:
> >> > Dear SH,
> >> >
> >> > Hmmm... what about
> >> >
> >> > substr(tempdf$name, 4, 6))
> >> >
> >> > ?
> >> >
> >> > HTH,
> >> > Jorge.-
> >> >
> >> >
> >> > On Thu, Mar 14, 2013 at 1:06 AM, SH <empti...@gmail.com> wrote:
> >> >>
> >> >> Dear list:
> >> >>
> >> >> I would like to extract three letters from first and second elements
> >> >> in one column and make a new column.
> >> >>
> >> >> For example below,
> >> >>
> >> >> > tempdf = read.table("clipboard", header=T, sep='\t')
> >> >> > tempdf
> >> >> name var1 var2 abb
> >> >> 1 Tom Cruiser 1 6 TomCru
> >> >> 2 Bread Pett 2 5 BrePet
> >> >> 3 Arnold Schwiezer 3 7 ArnSch
> >> >> > (p1 = substr(tempdf$name, 1, 3))
> >> >> [1] "Tom" "Bre" "Arn"
> >> >>
> >> >> I was able to extract three letters from first name, however, I don't
> >> >> know how to extract three letters from last name (i.e., 'Cru', 'Pet',
> >> >> and 'Sch'). Can anyone give me a suggestion? Many thanks in
> advance.
> >> >>
> >> >> Best,
> >> >>
> >> >> Steve
> >> >>
> >> >> ______________________________________________
> >> >> R-help@r-project.org mailing list
> >> >> https://stat.ethz.ch/mailman/listinfo/r-help
> >> >> PLEASE do read the posting guide
> >> >> http://www.R-project.org/posting-guide.html
> >> >> and provide commented, minimal, self-contained, reproducible code.
> >> >
> >> >
> >
> >
>
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
