data <- within(data,variable3=pmax(variable1,variable2))
also should work if your variables are numeric.

using dplyr and magrittr (which I recommend to all my students)
it could be

library(dplyr)
library(magrittr)
data %<>% mutate(variable3=pmax(variable1,variable2))



> On 26 Oct 2015, at 12:53, PIKAL Petr <petr.pi...@precheza.cz> wrote:
> 
> Hi
> 
>> -----Original Message-----
>> From: R-help [mailto:r-help-boun...@r-project.org 
>> <mailto:r-help-boun...@r-project.org>] On Behalf Of Duncan
>> Murdoch
>> Sent: Monday, October 26, 2015 11:58 AM
>> To: Lorenz, Jennifer; r-help@r-project.org <mailto:r-help@r-project.org>
>> Subject: Re: [R] Creating new variables in R
>> 
>> On 26/10/2015 6:24 AM, Lorenz, Jennifer wrote:
>>> Hi,
>>> 
>>> I  have a question regarding the creation of new variables on the
>> basis of existing ones in R.
>>> 
>>> I have two variables containing information on parents' educational
>> degree (e.g. 1 'high school degree', 2 'college degree', etc.). I would
>> like to create a new variable for 'parents' highest educational
>> degree', i.e. if variable1 (father's degree) is higher than variable2
>> (mother's degree) than the new variable (variable3) should take on the
>> value of variable1, if not, than variable3 should take on the value of
>> variable2.
>>> 
>>> I usually use SPSS for data manipulation, there I would code
>> variable3 as follows:
>>> COMPUTE variable3= 0.
>>> IF variable1 > variable2 variable3= variable1.
>>> IF variable1 <= variable2 variable3= variable2.
>>> 
>>> The closest I came to that in R was with this code:
>>> data$variable3 <- 0
>>> data$variable3[data$variable1 > data$variable2]<-data$variable1
>>> data$variable3[data$variable1 <= data$variable2]<-data$variable2
>>> 
>>> I also tried:
>>> data$variable3 <- ifelse(data$variable1 > data$variable2),
>>> data$variable1, data$variable2)
>>> 
>>> Both didn't work.
> 
> The ifelse version should work. Are you sure that variable 1 and 2 are 
> numeric?.
> 
> What is a result of str(data)?
> 
> Cheers
> Petr
> 
>>> 
>>> I am not sure if my post is at all understandable (this is my first
>> time posting on R-help), but I am really hoping for some advice!
>> 
>> This is a good place to use the ifelse() function:
>> 
>> data$variable3 <- ifelse(data$variable1 > data$variable2,
>>                         data$variable1, data$variable2)
>> 
>> Duncan Murdoch
>> 
>> ______________________________________________
>> R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
>> 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.
> 
> ________________________________
> Tento e-mail a jakékoliv k němu připojené dokumenty jsou důvěrné a jsou 
> určeny pouze jeho adresátům.
> Jestliže jste obdržel(a) tento e-mail omylem, informujte laskavě neprodleně 
> jeho odesílatele. Obsah tohoto emailu i s přílohami a jeho kopie vymažte ze 
> svého systému.
> Nejste-li zamýšleným adresátem tohoto emailu, nejste oprávněni tento email 
> jakkoliv užívat, rozšiřovat, kopírovat či zveřejňovat.
> Odesílatel e-mailu neodpovídá za eventuální škodu způsobenou modifikacemi či 
> zpožděním přenosu e-mailu.
> 
> V případě, že je tento e-mail součástí obchodního jednání:
> - vyhrazuje si odesílatel právo ukončit kdykoliv jednání o uzavření smlouvy, 
> a to z jakéhokoliv důvodu i bez uvedení důvodu.
> - a obsahuje-li nabídku, je adresát oprávněn nabídku bezodkladně přijmout; 
> Odesílatel tohoto e-mailu (nabídky) vylučuje přijetí nabídky ze strany 
> příjemce s dodatkem či odchylkou.
> - trvá odesílatel na tom, že příslušná smlouva je uzavřena teprve výslovným 
> dosažením shody na všech jejích náležitostech.
> - odesílatel tohoto emailu informuje, že není oprávněn uzavírat za společnost 
> žádné smlouvy s výjimkou případů, kdy k tomu byl písemně zmocněn nebo písemně 
> pověřen a takové pověření nebo plná moc byly adresátovi tohoto emailu 
> případně osobě, kterou adresát zastupuje, předloženy nebo jejich existence je 
> adresátovi či osobě jím zastoupené známá.
> 
> This e-mail and any documents attached to it may be confidential and are 
> intended only for its intended recipients.
> If you received this e-mail by mistake, please immediately inform its sender. 
> Delete the contents of this e-mail with all attachments and its copies from 
> your system.
> If you are not the intended recipient of this e-mail, you are not authorized 
> to use, disseminate, copy or disclose this e-mail in any manner.
> The sender of this e-mail shall not be liable for any possible damage caused 
> by modifications of the e-mail or by delay with transfer of the email.
> 
> In case that this e-mail forms part of business dealings:
> - the sender reserves the right to end negotiations about entering into a 
> contract in any time, for any reason, and without stating any reasoning.
> - if the e-mail contains an offer, the recipient is entitled to immediately 
> accept such offer; The sender of this e-mail (offer) excludes any acceptance 
> of the offer on the part of the recipient containing any amendment or 
> variation.
> - the sender insists on that the respective contract is concluded only upon 
> an express mutual agreement on all its aspects.
> - the sender of this e-mail informs that he/she is not authorized to enter 
> into any contracts on behalf of the company except for cases in which he/she 
> is expressly authorized to do so in writing, and such authorization or power 
> of attorney is submitted to the recipient or the person represented by the 
> recipient, or the existence of such authorization is known to the recipient 
> of the person represented by the recipient.
> ______________________________________________
> R-help@r-project.org <mailto:R-help@r-project.org> mailing list -- To 
> UNSUBSCRIBE and more, see
> https://stat.ethz.ch/mailman/listinfo/r-help 
> <https://stat.ethz.ch/mailman/listinfo/r-help>
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html 
> <http://www.r-project.org/posting-guide.html>
> and provide commented, minimal, self-contained, reproducible code.

Attachment: signature.asc
Description: Message signed with OpenPGP using GPGMail

______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.

Reply via email to