If statement in r, help translate from sas to r

How can I translate the SAS code below to r code

Data d;
 set d;
if ssn = 'shoe' then ssn ='5567';
if ssname ='Prodigy' then ssn= '1958';
if ssemail= 'compliance@ownregistrar.com' then ssn ='2400';
if ssurl= 'www.test.com' then ssn='9999';
if ssn= '8901' then ssname= 'Tech Start';
if ssn= '8901' then ssn= '1060'; 
if ssname = 'Ybm' then ssn='1495';
run;