Testing R sourcing