通过聚合 R 中的多个列来创建一个新列

Question

背景

我有一个数据集 df，我想在其中聚合多个列并创建一个新列。 我需要将 Type、Span 和 Population 列相乘并创建一个新的 Output 列

ID       Status      Type     Span   State   Population

A        Yes         2        70%    Ga      10000

所需 output

ID        Status     Type      Span   State   Population   Output

A         Yes        2         70%    Ga      10000        14000      

输入

structure(list(ID = structure(1L, .Label = "A ", class = "factor"), 
Status = structure(1L, .Label = "Yes", class = "factor"), 
Type = 2L, Span = structure(1L, .Label = "70%", class = "factor"), 
State = structure(1L, .Label = "Ga", class = "factor"), Population = 10000L), class = "data.frame", 
row.names = c(NA, 
-1L))

这是我尝试过的

 df %>% 
 mutate(Output = Type * Span * Population)

Answer 1

在这里，我们正在根据来自不同列的输入创建一个新列。 我们可以使用mutate来获得Population的Span百分比并乘以“类型”。 请注意，'Span' 不是数字，因为它有% ，所以我们用parse_number除以 100 提取数字部分，然后乘以 Population 和 'Type'

library(dplyr)
df %>%
  mutate(Output = Type * Population * readr::parse_number(as.character(Span))/100)
#   ID Status Type Span State Population Output
#1 A     Yes    2  70%    Ga      10000  14000

---

如果“类型”、“人口”列不是数字，最好使用as.numeric(as.character(df$Type))和“人口”（假设它们是factor类）转换为numeric 。 另一个选项是type.convert(df, as.is = TRUE)然后处理修改后的 class 数据集

Answer 2

我们可以使用sub删除'%'符号，转换为数字并乘以值。

这可以在基础 R 中完成，如下所示：

df$output <- with(df, Type * as.numeric(sub('%', '', Span)) * Population/100)
df

#  ID Status Type Span State Population  output
#1 A     Yes    2  70%    Ga      10000   14000