added comments to look for read_data.R on reading data portion