Create getUsefulInfo.R