more on gantt R