added stat = identity to the multi_dodge_bar plot