我有一个包含以下数据的excel表,我正在尝试将其读入r:

我想读一下A3:C6的表格。但是,此数据的维度可能会发生变化。我想把它定义为数据从左上角的A3开始,在右边的空白处结束,在底部的空白处结束。
我当前使用的是read_xlsx(skip = 2),但它也显示在第8行,这是我不想要的。
发布于 2021-06-23 19:30:36
下面的代码似乎做了问题所要求的事情。这是基于这样一个事实:对于空单元格,readxl::read_xlsx返回NA。
df1 <- readxl::read_xlsx(xl_filename, skip = 2)
i_col <- which(sapply(df1, function(x) all(is.na(x))))
i_col <- i_col[which(i_col == min(i_col))]
i_row <- which(apply(df1, 1, function(x) all(is.na(x))))
i_row <- i_row[which(i_row == min(i_row))]
df1[seq_len(i_row)[-i_row], seq_len(i_col)[-i_col]]https://stackoverflow.com/questions/68098323
复制相似问题