Plot Numbers in a bar chart?

Hi ,
I need to plot these parameters -20 , -10 , 10 , 20
Also know that first i need to set the first , second , third and only show them together
Need to become diagramm like that →

Something like this?

BarChart[{-20, -10, 10, 20}, LabelingFunction -> Center, AxesLabel -> {"x", "y"}, LabelStyle -> Directive[Medium, Bold], BarSpacing -> None]

Cheers,

Marco

Hi smallseries,

In Mathematica:

list = {-20, -10, 10, 20};
BarChart[list, ChartLabels -> Placed[list, Center], AxesLabel -> {x, y}]

it generated:

Is that what you are looking for?

Wilson
[1]: http://community.wolfram.com//c/portal/getImageAttachment?filename=Untitled-2.jpg&userId=858444

param = {z0 → 0, v0 → 0, g → 9.81 , k → 0.2};
p1 = Plot[{z[t] /. param}, {t, 0, 20},
PlotStyle → {RGBColor[0, 160, 1]}, PlotLabel → ā€œz[t]ā€,
AxesLabel → {t, z}]
p2 = Plot[{vz[t] /. param}, {t, 0, 20}, PlotRange → All,
PlotStyle → {RGBColor[33, 0, 1]}, PlotLabel → ā€œvz[t]ā€,
AxesLabel → {t, vz}]
something like that need to give the parameters i need to make it step by step
first -20 -10 10 then 20
then at last Show param or something like that