list = {2, 4, 6, 8};
ListPlot[Labeled[#, #, Center]& /@ list, PlotStyle -> None]
In the more general case in which coordinate pairs are specified, then the expression becomes:
dataXY = {{1, 3}, {2, 5}, {3, 7}, {4, 9}};
ListPlot[
Labeled[#, #[[2]]] & /@ dataXY,
PlotStyle -> None
]