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 <nitisha...@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 <smartpink...@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 <nitisha...@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. :)
>>>>
>>>
>>
>
______________________________________________
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.
