在ggplot中禁用分组和重新排序

Question

从我的数据中我想绘制点，每个记录一个点，就像记录在表中一样，而不重新排序。对于此示例表：

dt <- data.table(titles=factor(c('B','C','A','C')),
                 values=c(1,2,3,4) )

我想要以下情节：

到目前为止，我必须使用以下代码来执行此操作：

ggplot(data = dt, 
       aes(x=seq_len(nrow(dt)), y=values)) + 
  geom_point() +
  scale_x_discrete(labels=dt$titles) + xlab('titles')

但我真的不喜欢它：1）x=seq_len(nrow(...))所有混乱看起来很丑，2）我必须在dt中明确地解决scale_x_discrete。绘制这样的情节的正确方法是什么？