一共有20个二进制数据，想把每4行数据当成1个向量，最后绘制成一个5*1的矩阵（R语言实现）

可以使用以下代码实现：

# 假设有一个20*1的二进制数据向量 data
data <- sample(0:1, 20, replace = TRUE)

# 将数据向量转换成5*4的矩阵
matrix_data <- matrix(data, nrow = 5, ncol = 4)

# 按列求和，得到一个5*1的矩阵
result <- apply(matrix_data, 2, sum)

# 输出结果
print(result)

解释一下代码：

首先，我们生成一个长度为20的二进制数据向量（这里使用`sample`函数模拟数据）。然后，我们使用`matrix`函数将这个向量转换成一个5行4列的矩阵。接着，我们使用`apply`函数按列求和，得到一个5行1列的矩阵，即所需的结果。最后，我们输出结果。