R file updated