R代碼：如何從小標題列表中提取一列並將其用作函數的參數？

Question

我有一個9個小標題CCLF_Details的列表。 每個Tibble都命名為CCLF1_Details-CCLF9_Details。 我在每個小標題中都有“ COLUMN_LABEL”和“ COLUMN_WIDTH”列。 我想將這些列用作read_fwf的參數。

到目前為止，我已經完成了

width <- lapply(CCLF_details, "[","COLUMN_WIDTH", drop = FALSE)
label <- lapply(CCLF_details, "[","COLUMN_WIDTH", drop = FALSE)

但是當我通過read_fwf運行它時，我得到了

“ fwf_widths（width）中的錯誤：（列表）對象無法強制輸入“ double”類型”

當檢查“寬度”時，它指出它是一個帶有一列（並且該列是數字）的小標題列表，而不是數字矢量列表。

如何以一種格式將列用作Map函數的參數來獲取列？

Answer 1

是一個簡單的修復。 需要使用sapply代替

width <- sapply(CCLF_details, "[","COLUMN_WIDTH", drop = FALSE)
label <- sapply(CCLF_details, "[","COLUMN_WIDTH", drop = FALSE)

然后可以通過使用它作為read_fwf的參數

fwf_widths(widths = as.vector(width), col_names = as.vector(label))