adding data for production money and r file to clean it