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

【问题标题】：Categorise coloured cells using `readxl` package使用 `readxl` 包对彩色单元格进行分类
【发布时间】：2023-04-08 03:35:02
【问题描述】：

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

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

【问题讨论】：

tidyxl 不需要java并且可以读取颜色。

标签： r readxl

【解决方案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

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

【讨论】：