HI,
If you wish to keep it as factors (A-D), then try this:
test<-read.table(text="
?A B C D E F
?a b c d 40 30
?a f a b 20 10
?x m y m 50 30
",sep="",header=TRUE)
str(test)
#'data.frame':??? 3 obs. of? 6 variables:
# $ A: Factor w/ 2 levels "a","x": 1 1 2
# $ B: Factor w/ 3 levels "b","f","m": 1 2 3
# $ C: Factor w/ 3 levels "a","c","y": 2 1 3
# $ D: Factor w/ 3 levels "b","d","m": 2 1 3
# $ E: int? 40 20 50
# $ F: int? 30 10 30
?test$new_column_1<-(as.character(test$A)==as.character(test$C))*test$E
?test$new_column_2<-(as.character(test$B)==as.character(test$D))*test$F
test
#? A B C D? E? F new_column_1 new_column_2
#1 a b c d 40 30??????????? 0??????????? 0
#2 a f a b 20 10?????????? 20??????????? 0
#3 x m y m 50 30??????????? 0?????????? 30
#or
within(test,{new_column_2<-(as.character(B)==as.character(D))*F;new_column_1<-(as.character(A)==as.character(C))*E})
? #A B C D? E? F new_column_1 new_column_2
#1 a b c d 40 30??????????? 0??????????? 0
#2 a f a b 20 10?????????? 20??????????? 0
#3 x m y m 50 30??????????? 0?????????? 30
A.K.
From: Sapana Lohani <lohani.sapana at ymail.com>
To: arun <smartpink111 at yahoo.com>
Sent: Tuesday, August 28, 2012 5:40 PM
Subject: Re: [R] check and verify
To: arun <smartpink111 at yahoo.com>
Sent: Tuesday, August 28, 2012 5:40 PM
Subject: Re: [R] check and verify
Hi, may be i was not clear when I made this query before.
I have 6 columns in my dataframe (test)
A B C D E F
a b c d 40 30
a f a b 20 10
x m y m 50 30
I want a new column which gets value in E if character value in column A
matches with that in column C. One more column comparing B and D. It
gets the percentage in F column if value in column B matches the value
in D. If it doesn't match, it gets 0 percentage.
I tried the ?with, ?within and ?ifelse as suggested but am getting the error saying "Error in Ops.factor(test$A, test$C) : level sets of factors are different" How do i fix this ?
Basically I want my result to look like
A B C D E F new_column_1 new_column_2
a b c d 40 30 0 0
a f a b 20 10 20 0
x m y m 50 30 0 30
Could you please help me fix the error?
thanks
________________________________
From: arun <smartpink111 at yahoo.com>
To: Sapana Lohani <lohani.sapana at ymail.com>
Cc: R help <r-help at r-project.org>
Sent: Tuesday, August 28, 2012 5:49 AM
Subject: Re: [R] check and verify
Hi,
Try this:
?test$A<-(test$A==test$C)*test$E
?test$B<-(test$B==test$D)*test$F
?test
#?? A? B C D? E? F
#1? 0? 0 c d 40 30
#2 20? 0 a b 20 10
#3? 0 30 y m 50 30
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
?within(test,{A<-(A==C)*E; B<-(B==D)*F})
?#? A? B C D? E? F
#1? 0? 0 c d 40 30
#2 20? 0 a b 20 10
#3? 0 30 y m 50 30
A.K.
----- Original Message -----
From: Sapana Lohani <lohani.sapana at ymail.com>
To: R help <r-help at r-project.org>
Cc:
Sent: Tuesday, August 28, 2012 1:00 AM
Subject: [R] check and verify
Hi,
I have 6 columns in my dataframe (test)
A B C D E F
a b
c d 40 30
a f a b 20 10
x m y m 50 30
If character value in column A matches with that in column C, it gets the percentage in column E, similarly if value in column B matches the value in D, it gets the percentage in F column. If it doesn't match, it gets 0 percentage.
How can I do that ?
thanks
??? [[alternative HTML version deleted]]
______________________________________________
R-help at 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.