Adding standard deviation error bars to a stacked barplot

Hi, try to put a reproducible example of data.

Like, this:

# paste the result (change of name of his data)
dput(data[1:100, ]