使用 readxl 包对彩色单元格进行分类

Question

我正在尝试做的与 NSaunder's blog 所做的完全一样：将 Excel 中的彩色单元格更改为一个类别。但是，我使用的是 readxl 包，而 NSaunder 的 post 使用的是 xlsx 包。 xlsx 包有一个名为 getCellStyle 的函数，该函数 returns 可用于确定和重新分类单元格颜色的信息列表。我的问题是：在使用 readxl 包时是否可以使用类似的方法？

再次借用 NSaunder 的博客，here 是一些示例数据。

Answer 1

download.file("https://nsaunders.files.wordpress.com/2014/08/test.xlsx", "test.xlsx")

rx <- readxl::read_excel("test.xlsx")

tx <- tidyxl::xlsx_cells("test.xlsx")

rx$cat <- factor(tx$local_format_id[-1], labels = c("A", "B"))

rx
## # A tibble: 10 x 2
##        x cat  
##    <dbl> <fct>
##  1    1. A    
##  2    2. B    
##  3    3. A    
##  4    4. B    
##  5    5. A    
##  6    6. B    
##  7    7. A    
##  8    8. B    
##  9    9. A    
## 10   10. B

不过，这是一个非常简单的电子表格，您必须确保在真实文档中只处理您想要处理的 columns/rows。

使用 readxl 包对彩色单元格进行分类

Categorise coloured cells using `readxl` package

r

readxl