You might try running file.access(c("path_to_file.R"), mode=4)
in your R console. However, "Permission will be computed for real user ID and real group ID (rather than the effective IDs)." and I have no idea how that translates to Window's user model.