R在8行后添加空行

Question

我想在整个数据集中的每8行后添加一个空行。实际的是：

原始数据集

我希望获得的最终结果是：

预期数据集

提前致谢。

Answer 1

cur <- rbind(df[1:8,], NA)
for(i in seq(from = 9, to = length(df), by = 8) {
    cur <- rbind(df[i:(i+7),], NA)
}

Answer 2

这个答案适用于数字列。

最初，对于前八个观察，您可以生成一个矩阵，该矩阵是长度为8且另外NA列的向量的矩形：v<- c(rep(1, 8),NA)

然后你可以kronecker使用原始版本kron(a,v)（在as.matrix和a上应用v后）生成此矩阵。

这应该可以使用循环对每个第8行进行扩展。

对于字符列，您可以先使用rbind定义的循环将NA seq行分隔到每个第8个元素，然后cbind将其分隔回来数字矩阵。