打印第3个数和所有能被2整除的元素
Print the 3rd number and all the elements divisible by 2
nums <- 1:20
result <- nums[fill the function]
result
谁能告诉我用什么函数
你可以这样做：
sort(c(nums[nums %% 2 == 0], nums[3]))
#[1] 2 3 4 6 8 10 12 14 16 18 20
nums %% 2 == 0 用于对可被 2 整除的数字进行子集化，我们添加 nums[3] 以获得第 3 个数字。我们在排序后打印最终输出。
我们可以使用
sort(c(nums[!nums %% 2][3], nums[!nums %% 2]))
nums <- 1:20
result <- nums[fill the function]
result
谁能告诉我用什么函数
你可以这样做：
sort(c(nums[nums %% 2 == 0], nums[3]))
#[1] 2 3 4 6 8 10 12 14 16 18 20
nums %% 2 == 0 用于对可被 2 整除的数字进行子集化，我们添加 nums[3] 以获得第 3 个数字。我们在排序后打印最终输出。
我们可以使用
sort(c(nums[!nums %% 2][3], nums[!nums %% 2]))