michael watson (IAH-C) wrote: > There must be a million ways of doing this! Actually I'd say there were no ways of doing this, since I dont think you can actually insert into a vector - you have to create a new vector that produces the illusion of insertion! Here's a Q+D function that fails if you try and insert at the start, or at the end. Its very D. insert <- function(v,e,pos){ return(c(v[1:(pos-1)],e,v[(pos):length(v)])) }
Actually I'd say there were no ways of doing this, since I dont think you can actually insert into a vector - you have to create a new vector that produces the illusion of insertion!
Here's a Q+D function that fails if you try and insert at the start, or at the end. Its very D.
insert <- function(v,e,pos){
return(c(v[1:(pos-1)],e,v[(pos):length(v)]))
> v=c(1,2,3,4,6)
> insert(v,5,5) [1] 1 2 3 4 5 6
Yay.
> insert(v,5,1) [1] 1 5 1 2 3 4 6
Oops.
Cant be bothered to fix it, the principle is there.
Baz
This archive was generated by hypermail 2.1.8 : Fri 18 Mar 2005 - 01:20:12 EST