R[{f1_, f2_}] := {-f1+f2, -f1} /. {x->-x-y, y->x}

R@{f1[x,y], f2[x,y]}

R@R@{f1[x,y], f2[x,y]}

R@R@R@{f1[x,y], f2[x,y]}