r - 根据前导空格的数量将列分成新列

Question

这些报告来自quickbooks ，下载为 Excel 文件。请注意，左列是基于左间距的嵌套层次结构。

我需要根据左侧前导空格的数量将描述列分成单独的列。

由于我最近一直在处理财务报告，这些报告非常常见且极难处理。有导入此类数据的包或函数吗？

这是可重现的输入数据框示例:

df1 <- structure(list(Description = c("asset", " current asset", "   bank acc", 
                                      "    banner", "    clearing",
                                      "   total bank accounts",
                                      " total current assets"),
                 Total = c(NA, NA, NA, 10L, 20L, 30L, 30L)),
            .Names = c("Description", "Total"), 
            class = "data.frame", 
            row.names = c(NA, -7L))

Answer 1

您可以尝试 tidyxl 和 unpivotr 来完成这些 Excel 整理任务。以下是文档:

• 取消透视:https://github.com/nacnudus/unpivotr
• tidyxl:https://nacnudus.github.io/tidyxl/

这是一个很好的教程:https://blog.davisvaughan.com/2018/02/16/tidying-excel-cash-flow-spreadsheets-in-r/