Datatable manipulation
Hi, Assuming that this is the case: dat1 <- read.table(text="a???? b???? c???? d?????? e 1???? 2???? 3???? 4???? 5 10???? 9???? 8???? 7???? 6",sep="",header=TRUE) Names1<- read.table(text="Original????? New?? e???? ee g??? gg a???? aa c???? cc f???? ff",sep="",header=TRUE,stringsAsFactors=FALSE) ? ?indx <- match(names(dat1),Names1[,1]) ?names(dat1)[names(dat1) %in% Names1[,1]] <- Names1[,2][indx[!is.na(indx)]] ?dat1 #? aa b cc d ee #1? 1 2? 3 4? 5 #2 10 9? 8 7? 6 A.K.
On Friday, November 22, 2013 4:46 AM, Nitisha jha <nitisha999 at gmail.com> wrote:
Hey! I got this one. :) For the match function, actually I just want the ones that are matching to be replaced. Rest should stay the same. How do I do that? When I tried your command, if there is no match, it writes var2 or something.?
On Fri, Nov 22, 2013 at 12:38 AM, arun <smartpink111 at yahoo.com> wrote:
Hi,
Try:
dat1 <- read.table(text="a ??? b ??? c ??? d?????? e
1 ??? 2 ??? 3 ??? 4 ??? 5
10 ??? 9 ??? 8 ??? 7 ??? 6",sep="",header=TRUE)
Names1<- read.table(text="Original? ??? New???
e ??? ee
b ??? bb???
a ??? aa
c ??? cc
d ??? dd",sep="",header=TRUE,stringsAsFactors=FALSE)
It is better to dput() your dataset.? For example:
?dput(Names1)
structure(list(Original = c("e", "b", "a", "c", "d"), New = c("ee",
"bb", "aa", "cc", "dd")), .Names = c("Original", "New"), class = "data.frame", row.names = c(NA,
-5L))
?names(dat1) <- Names1[,2][match(names(dat1), Names1[,1])] ##
?dat1
#? aa bb cc dd ee
#1? 1? 2? 3? 4? 5
#2 10? 9? 8? 7? 6
A.K.
On Thursday, November 21, 2013 1:45 PM, Nitisha jha <nitisha999 at gmail.com> wrote:
Hi,
Thanks. I used as.character() and got the right strings.
Btw, I have lots of handicaps regarding R.
I have to rename the columns(I have 22 columns here). I have the new names along with the original names in another dataset. Right now, I am going hardcoding all the? 19 name changes(tedious and not optimum). 1st 3 names remain the same. I will give u a sample dataset. Let me know if there is any easy way of doing this.? Pardon the displaced column labels.
Original dataset.
?? a b c d??????????? ?
e
1 2 3 4 5
10 9 8 7 6
Dataset for name change
Original? New
e ee
b bb
a aa
c cc
d dd
I want my final dataset to be like this:
aa bb cc dd ee
1 2 3 4 5
10 9 8 7 6
?Could u tell me an optimal way to do it. My method is tedious and not good.
Also, is there a way to import .xls without perl (windows)?
Thanks for being patient. :)