将CSV文件上传至Shiny App遇问题：数据无法读取、列名不识别

问题根源 #

你的CSV文件是分号分隔、逗号作为小数分隔符的欧洲格式，但App的读取逻辑存在两处矛盾：

1. 初次上传时，代码通过判断首行是否包含;，调用read.csv2读取（这一步是正确的，因为read.csv2默认适配分号分隔、逗号小数位的格式）
2. 读取后却用write.csv保存数据，而write.csv默认采用逗号分隔、句点小数位的格式；重置时又用read.csv读取这个被转换格式的文件，直接导致解析混乱
3. Excel导出时的格式设置偏差，也会加剧分隔符或编码的识别问题

方案1：调整Excel导出设置（无需修改代码） #

直接导出适配read.csv2的标准格式：

• 打开Excel文件，选择「文件」→「另存为」
• 若你的Excel是欧洲语言版本，直接选择保存类型为**「CSV（分号分隔）」**；若为英文版本，需手动配置：
  • 点击「工具」→「Web选项」→「编码」，选择「UTF-8」
  • 调整系统区域设置：Windows用户进入「控制面板→区域→其他设置」，Mac用户进入「系统设置→通用→语言与地区→高级」，设置小数分隔符为逗号、列表分隔符为分号
• 保存后直接上传，App的read.csv2即可正确识别表头与数据

若不想修改系统设置，可手动编辑CSV：

• 用记事本打开导出的CSV，确认首行格式为Temperature;A1，每行数据为71,85;5,62，且文件编码为UTF-8

方案2：修改Shiny App代码（若有权限） #

调整上传、保存、重置的逻辑，保持格式统一：

1. 替换保存逻辑，用write.csv2替代write.csv，维持分号分隔与逗号小数位：

write.csv2(vals$df, file = "data.csv", row.names = F)

2. 重置时用read.csv2读取保存的文件：

vals$df <- read.csv2("data.csv")

3. 在读取函数中显式指定header=TRUE，确保表头被正确识别：

if (grepl(";", L)) {
  vals$df <- read.csv2(input$hmr$datapath, header = TRUE)
} else {
  vals$df <- read.csv(input$hmr$datapath, header = TRUE)
}

临时验证方案 #

若需快速测试数据，可在本地R环境先转换格式：

# 读取原始CSV
df <- read.csv2("your_raw_file.csv", header = TRUE)
# 转换为逗号分隔、句点小数位的CSV（适配read.csv默认规则）
write.csv(df, "formatted_file.csv", row.names = FALSE)

上传转换后的formatted_file.csv，即可被App正确解析

内容的提问来源于stack exchange，提问作者Zoë dK