如何在R数据帧列中找到非缺失值的总和?