diet_data practice assignment completed
practice.R addded