I have a list of data where each point should have a label. I would like the labels to be below the plot, where tick labels usually are. This is what I have so far:
data = {1, 4, 3, 6};
labels = {"long name", "short", "what is this even", "this thing"};
ListPlot[data,
Ticks -> {MapIndexed[{First[#2], Rotate[#1, 90 Degree]} &, labels], Automatic}]
The problem is that the rotated labels are centered. How can I right-align the labels so that the space between the axis and the label is the same for each label?