根据R中的给定值选择最接近且更大的值

# 定义一个包含多个值的向量
values <- c(1, 3, 5, 7, 9)

# 给定值
given_value <- 4

# 找到最接近且更大的值的索引
index <- which(values >= given_value)
if (length(index) > 0) {
  index <- min(index)
} else {
  index <- length(values)
}

# 获取最接近且更大的值
closest_greater_value <- values[index]

# 打印结果
print(closest_greater_value)