使用for loop处理向量时如何避免非数值错误？

问题原因 #

你的代码执行到第三行Nums[Nums%%2==0 & Nums%%3==0]<="OK1"时，会将数值向量Nums的部分元素替换为字符值，此时整个向量的类型会自动从数值型转为字符型。后续代码对字符型向量执行Nums%%2这类数值运算时，必然触发non-numeric argument to binary operator错误——字符无法参与取模运算。

修复方案 #

核心思路是保留原始数值向量用于判断逻辑，用新向量存储最终结果，避免修改原数值向量的类型。修改后的代码如下：

for(n in 1:30){
    nums <- 1:n  # 始终保持数值型，用于后续判断
    result <- nums  # 创建结果向量，初始继承数值
    # 基于原始数值向量nums做判断，给result赋值
    result[nums %% 2 == 0 & nums %% 3 == 0] <- "OK1"
    result[nums %% 2 == 0 & nums %% 3 != 0] <- "OK2"
    result[nums %% 2 != 0 & nums %% 3 == 0] <- "OK3"
    result[nums %% 2 != 0 & nums %% 3 != 0] <- n
    # 按需处理结果，比如打印
    print(result)
}

说明 #

• nums全程保持数值型，所有取模判断都基于它，不会出现类型错误。
• result会因混合字符串和数值自动转为字符型，但不影响前置的判断逻辑执行。

内容的提问来源于stack exchange，提问作者lililililililili