edited .r file