在R中，可以使用summarize()函数和条件语句来按条件在数据框的列中求和。以下是一个示例代码：

# 创建一个数据框
df <- data.frame(
  name = c("Alice", "Bob", "Charlie", "David", "Eve"),
  age = c(25, 30, 35, 40, 45),
  score = c(80, 90, 85, 95, 70)
)

# 按条件在"score"列中求和
sum_score <- summarize(df, sum_score = sum(score))
print(sum_score)

# 按条件（年龄大于30）在"score"列中求和
sum_score_age_gt_30 <- summarize(df, sum_score = sum(score[age > 30]))
print(sum_score_age_gt_30)

运行上述代码，将输出如下结果：

  sum_score
1       420
  sum_score
1       180

第一个示例中，我们使用summarize()函数直接对整个"score"列求和。第二个示例中，我们添加了一个条件语句age > 30来限制求和的范围。