Create factorialR.c