added outgroup R file