call R from C