我正在使用美国所有交通系统的数据库,并尝试比较不同的机构。每个案例都是组织的特定部分。例如,公交线路与地铁是分开的。我想结合给定机构的所有案例的价值。
基本上我想对每个“Trs_Id”的每一列的值求和,然后删除其余的。该数据框是运营费用(“运营支出”)的细分。这是我的数据集在 R 中的样子:
> colnames(opex)
[1] "Trs_Id" "Mode_Cd"
[3] "Service_Cd" "Expense_Category_Desc"
[5] "Op_Sal_Wage_Amt" "Other_Sal_Wage_Amt"
[7] "Fringe_Benefit_Amt" "Service_Costs_Amt"
[9] "Fuel_Lubricant_Amt" "Tire_Tube_Amt"
[11] "Other_Mat_Sup_Amt" "Utility_Amt"
[13] "Casuality_Liability_Amt" "Tax_Amt"
[15] "In_Report_Amt" "Sep_Report_Amt"
[17] "Misc_Expense_Amt" "Expense_Transfer_Amt"
[19] "Ada_Related_Amt"
> NROW(opex)
[1] 6956
> id_nm <- table(opex$Trs_Id)
> NROW(id_nm)
[1] 616