r - 添加带有空白条目的两列以及在最后一列中全部空白

Question

我正在尝试添加具有许多（不是全部）空白条目的多列（在 R 中），但在最后一列中我得到了所有空白。我正在使用简单的 +/- 运算符进行此操作。

Final8$Abs_diff <- abs((Final8$prev_so_Qty + Final8$prev_dc_Qty + Final8$Import_Qty + 
                        Final8$Fs_trns_in_Qty) - 
                       (Final8$Trade_Qty + Final8$Fs_trns_out_Qty + Final8$crt_so_Qty + 
                        Final8$crt_dc_Qty))

我觉得空白条目在这里造成了问题，有人可以帮助我如何避免这种情况

Answer 1

使用 with 函数rowSums处理列na.rm = TRUE之后的缺失值cbind。

Final8$Abs_diff <- abs(rowSums(cbind(Final8$prev_so_Qty, Final8$prev_dc_Qty,  Final8$Import_Qty,  
                        Final8$Fs_trns_in_Qty), na.rm = TRUE) - 
                       rowSums(cbind(Final8$Trade_Qty, Final8$Fs_trns_out_Qty, Final8$crt_so_Qty,  
                        Final8$crt_dc_Qty), na.rm = TRUE))