added some R files