,可以通过以下步骤实现:
下面是一个示例代码:
# 示例数据框
df <- data.frame(col = c(1.2, 2.7, 3.5, 4.9, 5.1))
# 创建空的向量用于存储舍入后的值
rounded_values <- vector("numeric", length = nrow(df))
# 使用for循环进行舍入
for (i in 1:nrow(df)) {
if (df$col[i] > 3) {
rounded_values[i] <- round(df$col[i])
} else {
rounded_values[i] <- floor(df$col[i])
}
}
# 将舍入后的值添加到数据框中
df$rounded_col <- rounded_values
# 打印结果
print(df)
这段代码会根据条件,对数据框df中的col列进行舍入操作。如果元素的值大于3,则使用round()函数进行四舍五入;否则,使用floor()函数向下取整。最后,将舍入后的值添加到数据框中的新列rounded_col中。
腾讯云相关产品和产品介绍链接地址:
领取专属 10元无门槛券
手把手带您无忧上云