R语言中RDS转CSV再转回后新记录显示异常的问题求助

问题根源 #

你创建新记录的方式data.frame("D")会生成一个自动命名列的数据框，若原CSV的列结构（列名、列数）和这个新数据框不匹配，读取后就会出现显示异常，导致新记录被识别为data.frame而非预期的"D"。另外，你加载的foreign包在此流程中没有作用，可以省略。

修正步骤 #

1. 查看原CSV的结构
   先读取原CSV，确认列名和列数，确保新记录和原数据结构一致：

   original_df <- read.csv("my_csv_dataframe.csv")
   # 查看列名
   colnames(original_df)
   # 查看数据结构
   str(original_df)
   

2. 创建匹配结构的新记录
   根据原数据的列名创建新记录，比如原数据列名为V1：

   new_record <- data.frame(V1 = "D", stringsAsFactors = FALSE)
   

   （注：stringsAsFactors = FALSE避免自动把字符转为因子，R版本4.0+默认已经是FALSE，但加上更稳妥）

3. 追加到CSV并验证
   执行追加操作，确保参数正确：

   write.table(new_record, file = "my_csv_dataframe.csv", 
               append = TRUE, quote = TRUE, 
               col.names = FALSE, row.names = FALSE)
   

   可以重新读取CSV查看是否追加成功：

   temp_df <- read.csv("my_csv_dataframe.csv")
   tail(temp_df) # 查看最后几行
   

4. 转回RDS格式
   确认数据正确后，保存为RDS：

   updated_df <- read.csv("my_csv_dataframe.csv")
   saveRDS(updated_df, "my_updated_dataframe.rds")
   

5. 验证最终结果
   读取新的RDS文件查看：

   final_df <- readRDS("my_updated_dataframe.rds")
   tail(final_df)
   

内容的提问来源于stack exchange，提问作者GKC