If it is just about the plot, you can try:
ListStepPlot[listID1, Center]
EDIT:
The above is "sub optimal", better is:
ListStepPlot[ArrayPad[listID1, 1], Center]
Do you mean style-wise or as a probability distribution or both or something else?
Could change Table to Sum.
Table
Sum
