Re: [R] sequence with start and stop positions

[Ray Brownrigg]

And somewhat faster still (YMMV):

unlist(mapply(":", start, stop))

HTH,
Ray Brownrigg
Victoria University of Wellington

Christos Hatzis wrote:

Try:

unlist(mapply(seq, c(1,20,50), c(7,25,53)))

 [1]  1  2  3  4  5  6  7 20 21 22 23 24 25 50 51 52 53

-Christos

-----Original Message-----

From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Chris Oldmeadow

Sent: Tuesday, August 26, 2008 12:42 AM
To: r-help@r-project.org
Subject: [R] sequence with start and stop positions

Hi,

I have a vector of start positions, and another vector of stop positions,

eg start<-c(1,20,50)
     stop<-c(7,25,53)

Is there a quick way to create a sequence from these vectors?

new<-c(1,2,3,4,5,6,7,20,21,22,23,24,25,50,51,52,53)

the way Im doing it at the moment is

pos<-seq(start[1],stop[1])

for (i in 2:length(start)){
  new<-seq(start[i],stop[i])
  pos<-c(pos,new)
}

This works on small data, but its very inefficient on large vectors, and is taking forever!

Anybody no a better way?

many thanks,
Chris

______________________________________________
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.

______________________________________________
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.

______________________________________________
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.