Stata to R Replace Values based on Condition

I'm trying to do something very simple in R that I can do in STATA but I can't quite get it right. Here is my sample of my data data<-data.frame( C1=c(rep(2,5), rep(20,5), rep(70,5)), C2=...