R 如何计算每列的观察数（1）

假设我有以下数据帧，请将0读取为NA：

x = c("a","b","c","d","e")
y = c(1,1,0,0,1)
z = c(0,0,0,0,1)
data.frame(x,y,z)

---

如何计算每列（即a、b、c、d、e）的1数？

如果只有0/1，您只需将相关行相加即可。选择器选择从2到3的所有列。该向量可以根据您的需要进行调整

第二部分添加向量

x

中的名称

x = c("a","b","c","d","e")
y = c(1,1,0,0,1)
z = c(0,0,0,0,1)
df <- data.frame(x,y,z)

s <- rowSums(df[2:3])
names(s) <- x
s
# a b c d e 
# 1 1 0 0 2 

x=c（“a”、“b”、“c”、“d”、“e”）
y=c（1,1,0,0,1）
z=c（0,0,0,0,1）
df如果只有0/1，您可以简单地汇总相关行。选择器选择从2到3的所有列。该向量可以根据您的需要进行调整

第二部分添加向量
x
中的名称

x = c("a","b","c","d","e")
y = c(1,1,0,0,1)
z = c(0,0,0,0,1)
df <- data.frame(x,y,z)

s <- rowSums(df[2:3])
names(s) <- x
s
# a b c d e 
# 1 1 0 0 2 

x=c（“a”、“b”、“c”、“d”、“e”）
y=c（1,1,0,0,1）
z=c（0,0,0,0,1）
df您会发现，您的代码将生成一个按行而不是列组织的data.frame

data <- data.frame(x,y,z)
data
  x y z
1 a 1 0
2 b 1 0
3 c 0 0
4 d 0 0
5 e 1 1

然而，现在我们有两个问题，首先，数据现在是一个矩阵。其次，数据现在是字符数据，因为数值数据和字符数据不能存在于data.frame的同一列中

相反，我们可能只对数值列进行子集划分，并转置这些列：

new.data <- as.data.frame(t(data[,-1]))
new.data
  V1 V2 V3 V4 V5
y  1  1  0  0  1
z  0  0  0  0  1

如果我们需要将NA放入0中，我们可以子集：

result[result == 0] <- NA
result
a  b  c  d  e 
1  1 NA NA  2 

result[result==0]您会发现，您的代码将生成一个按行而不是列组织的data.frame

data <- data.frame(x,y,z)
data
  x y z
1 a 1 0
2 b 1 0
3 c 0 0
4 d 0 0
5 e 1 1

然而，现在我们有两个问题，首先，数据现在是一个矩阵。其次，数据现在是字符数据，因为数值数据和字符数据不能存在于data.frame的同一列中

相反，我们可能只对数值列进行子集划分，并转置这些列：

new.data <- as.data.frame(t(data[,-1]))
new.data
  V1 V2 V3 V4 V5
y  1  1  0  0  1
z  0  0  0  0  1

如果我们需要将NA放入0中，我们可以子集：

result[result == 0] <- NA
result
a  b  c  d  e 
1  1 NA NA  2 

result[result==0]