R编程，Excel文件计算和通过R进行修改

Question

Here is the screenshot of my problem

我正在尝试做我的excel文件sales.csv中每一列的总和 所以我试图执行下面的代码，但是对于所有列，我得到的总和为零。下面是我的代码：

sales <- read.csv("Dress Sales.csv")
names(sales)
sales[,-c(25:36)]->sales
sales
sales = as.data.frame(lapply(sales, as.numeric))

#NAs to be imputed by row mean
sales_matrix = as.matrix(sales)

rowMean = apply(sales_matrix[,-1],1,mean,na.rm=T)

i=1
for(i in 1:nrow(sales_matrix))
{
  if(sum(is.na(sales_matrix[i,]))>0)
    sales_matrix[i, is.na(sales_matrix[i,])] = rowMean[i]
}

colSums(is.na(sales_matrix))

Answer 1

使用colSums(is.na(sales_matrix))，您只需在给定列中计算NA值的数量。我不确定那是否就是你所追求的。

相反，如果您希望sales_matrix的列的实际总和，请使用： colSums(sales_matrix,na.rm=T)