Here's mine...
CREATE FUNCTION YearsDiff(@Born date,@AsOf date) RETURNS int AS
BEGIN
    DECLARE @y int
    SET @y = DATEDIFF(YEAR,@Born,@AsOf)
    IF DATEADD(year,@y,@Born) > @AsOf SET @y -= 1

I'm brand new to R and not really sure what I was doing, but I was able to make it through this with a new install of RevolutionROpen and the...