Create draw_barplot.r

for barplot drawing