daten1 = {{2, 0.3}, {4, 2.0}, {7, 8.1}, {9, 46.2}, {11, 107.1}, 
          {14, 105.1}, {16, 96.0},{18, 82.8}, {21, 81.7}, 
          {23,79.1}, {25,88.2} }; 
bild1 = ListPlot[daten1, PlotStyle -> PointSize[0.02], 
ImageSize->{400,300}]