这种行为的原因一直存在于未导出的函数ggplot2:::rotate_just()中，如果您在ggplot2:::element_grob.element_text-〉titleGrob-〉title_spec上运行debug，则可以找到该函数。
这是它的代码，在我当前的包版本（ggplot 2 3.4.2）中：

> ggplot2:::rotate_just
function (angle, hjust, vjust) 
{
    angle <- (angle %||% 0)%%360
    if (0 <= angle & angle < 90) {
        hnew <- hjust
        vnew <- vjust
    }
    else if (90 <= angle & angle < 180) {
        hnew <- 1 - vjust
        vnew <- hjust
    }
    else if (180 <= angle & angle < 270) {
        hnew <- 1 - hjust
        vnew <- 1 - vjust
    }
    else if (270 <= angle & angle < 360) {
        hnew <- vjust
        vnew <- 1 - hjust
    }
    list(hjust = hnew, vjust = vnew)
}

在第一种情况下，使用angle = 90, hjust = 1, vjust = 0.5，满足第二组条件，因此修改后的值为hjust = 0.5, vjust = 1。
在第二种情况下，对于angle = 89, hjust = 1, vjust = 0.5，满足第一组条件，因此值保持不变，为hjust = 1, vjust = 0.5。
如果你想让第二种情况的垂直对齐方式模仿第一种情况，设置vjust = 1就可以了（虽然我认为这是理论上的边缘情况，因为我想不出很多理由来使用angle = 89而不是真实的生活中的90...）

尝试同时指定vjust = 0.5和hjust = 0.5，这样就可以避免这个问题。

ggplot(mtcars, aes(x = 1000*mpg, y = hp)) +
geom_point() +
theme(
axis.text.x = element_text(angle = 75, vjust = .5, hjust = .5)
)