Hi,

this is one way:

ListPlot[{#, Sin[#]} & /@ Range[0.1, 0.9, 0.1]]

If you really want, you can do it with Plot, too, but it is really artificial:

Plot[Sin[t], {t, 0.0, 1}, Mesh -> {Range[0., 1, 0.1]}, MeshStyle -> Directive[Red, PointSize -> Large], PlotStyle -> None]

Cheers,

Marco

Hi,

if you DecretePlot, you can use the option Filling->None to get rid of the vertical lines.

DiscretePlot[Sin[t], {t, 0.1, 0.9, 0.1}, Filling -> None]

Cheers,

Marco

The Joined option can be used to let DiscretePlot "fake" a continuous plot:

DiscretePlot[Sin[t], {t, 0, 2, 0.1}, Joined -> True, Filling -> None]