[emissivity]

at first, please look at this link
http://upload.wikimedia.org/wikipedia/commons/0/0a/Potentiometrics_meas_1st_2nd_deriv-with-legend.JPG

as you know, potentiometric titration's data makes this graph.

and first derivative, 2nd derivative etc..

I haven't tried this experiment yet.
So I'd like to try this by the data which I just make by myself.
this is not my real data.

data = {{0, 1.0}, {2.5, 1.2}, {5.0, 1.3}, {7.5, 1.5}, {10.0,
1.7}, {12.5, 2.0}, {15.0, 7.0}, {17.5, 11.9}, {20.0, 12.1}, {22.5,
12.3}, {25.0, 12.4}, {27.5, 12.5}, {30.0, 12.5}}


1. I plotted the data.
ListPlot[data]

2. and I used interpolation.
f=Interpolation[data]

3. I plotted the graph
Plot[f

• , {x, 0, 30}]

there is a problem. If you try this, you would find out, near the end point, it doesnt fit well.
I want the graph just like the link as I mentioned first
http://upload.wikimedia.org/wikipedia/commons/0/0a/Potentiometrics_meas_1st_2nd_deriv-with-legend.JPG




well.. I know that I can draw these graph by my hand by the excel.
just write the data,
plot the graph,
and I find dy/dx one by one
and draw the 1st derivative graph,
and d2y/dx2 one by one..
...


but

as you know,
I think this stupid doing is not good

So I just want to plot the data easily by the mathematica..

is there any way to draw the data easily?
or just I have to plot the graph one by one?

please help me..

[emissivity]

well

I made it

after I figure it out to delete this post
I will delete this.