使用 rowsum 将新列添加到数据框 (R)

Adding new column to dataframe (R) with a rowsum

编辑:讲师建议在我们进入数据分析时使用 Stack Overflow 寻求社区支持并利用社区。我是一名成熟的学生,这是一次职业转型尝试。我的目标是学习,大家很棒 - 感谢您的帮助 这是我的第一份作业,我正在尝试自己完成 - 但我遇到了障碍

我有一个数据框 CrimeDataTheft。它的列主要是数字和一个字符。 我正在尝试创建一个名为 Country Totals 的新列,它将是行数字数据(如下命名)的总和。我没有包含国家/地区列,因为它是一个字符列。

我将带有 sumed 变量的新旧列放在名为 SumCrimeData 的数据框中

SumCrimeData <- CrimeDataTheft$Country.Totals = rowsum(CrimeDataTheft[,c(Intentional.homicide, 
                   Attempted.intentional.homicide, Assault, Kidnapping, Sexual.violence
                   , Robbery, Unlawful.acts.involving.controlled.drugs.or.precursors)], na.rm = TRUE)

我得到的错误是

Error in `[.data.frame`(CrimeDataTheft, , c(Intentional.homicide, Attempted.intentional.homicide,  : 
  object 'Intentional.homicide' not found

我正在从 csv 中提取数据,名称被准确复制。有人可以指出我哪里出错了吗?谢谢!!

dput(head(CrimeDataTheft, 5)) 
structure(list(Country = c("Albania", "Austria", "Belgium", "Bosnia and Herzegovina", 
"Bulgaria"), Intentional.homicide = c(2.03, 0.84, 1.27, NA, 1.14
), Attempted.intentional.homicide = c(3.25, 1.93, 8.87, NA, 0.54
), Assault = c(5.52, 43.29, 556.36, NA, 39.54), Kidnapping = c(0.14, 
0.07, NA, NA, 1.03), Sexual.violence = c(5.38, 50.9, 77.45, NA, 
8.64), Robbery = c(3.42, 29.67, 140.14, NA, 16.9), Unlawful.acts.involving.controlled.drugs.or.precursors = c(70.26, 
494.05, 547.74, NA, 78.14), Country.Totals = c(90, 620.75, 1331.83, 
0, 145.93), Country.Totals.per.000s = c(90, 620.75, 1331.83, 
0, 145.93)), row.names = c(NA, 5L), class = "data.frame")

rowsum() 函数用于分组计算。使用 rowSums() 函数来做你想做的,在变量名上加上引号以避免你的第一个错误

根据您在评论中提到的内容,您似乎没有 SumCrimeData 数据框。如果您决定使用 rowSums 而不是 rowsum,您将需要创建 SumCrimeData 数据框。

应该对您选择的行求和并创建一个名为 Country.Totals

的新列
CrimeDataTheft$Country.Totals <- rowSums(CrimeDataTheft[,c("Intentional.homicide","Attempted.intentional.homicide", "Assault", "Kidnapping", "Sexual.violence","Robbery", "Unlawful.acts.involving.controlled.drugs.or.precursors")], na.rm = TRUE)

然后您可以通过执行以下操作来创建新数据框

SumCrimeData <- as.data.frame(CrimeDataTheft$Country.Totals)

或者如果您不想将其作为数据框,您可以这样做

SumCrimeData <- CrimeDataTheft$Country.Totals

我不确定您是否可以像您在问题中显示的那样在同一步骤中创建一个新列和一个新数据框,即 SumCrimeData <- CrimeDataTheft$Country.Totals = rowsum(...)