Displaying 1 result from an estimated 1 matches for "ss_c".
Did you mean:
sf_c
2012 Jan 15
0
patching ?merge to allow the user to keep the order of one of the two data.frame objects merged
...the "id..." column. Orders by it and returns
it
if(!any(colnames(DATA)=="id..."))
{
warning("The function order.by.id...and.remove.it is useful only for
data.frame objects that includes the 'id...' order column")
return(DATA)
}
ss_r <- order(DATA$id...)
ss_c <- colnames(DATA) != "id..."
DATA[ss_r, ss_c]
}
# example:
# set.seed(3424)
# x <- data.frame(x = rnorm(5), x2 = rnorm(5))
# x2 <- add.id.column.to.data(x)[c(1,4,2,5,3),]
# x2
# order.by.id...and.remove.it(x2)
if(keep_order == 1) x<-add.id.column.to.data(x)
if(keep_order...