警告：较长的对象长度不是较短对象长度的倍数？

Question

我有一个带有州缩写（AK，VT等）的数据帧列。我想将它们分解为区域，用数值替换列中的数据。我将每个区域放在一个列表中，如下所示：

south <- c("KY", "TN", ...)

并尝试了这段代码：

df[df$state == south] <- 1

但是当我收到警告时（较长的物体长度不是较短物体长度的倍数）

我不确定为什么。是否有更好的方法来替换州缩写，以便我可以将它们作为数字因子？