Using an if statement inside of ddply summarize

Using an if statement inside of ddply summarize

Is there a way to use if statements in ddply in R?
I've looked but can't seem to figure it out.
Cheers