在 R 中使用 write.table() 导出数据框时保留数值类

如何解决在 R 中使用 write.table() 导出数据框时保留数值类

我合并了两个数据框：

df1 <- read_csv("df1.csv",col_types = cols(Date = col_date(format = "%d/%m/%Y")))
df2 <- read_csv("df2.csv",col_types = cols(Date = col_date(format = "%d/%m/%Y")))
df3 <-left_join(df1,df2,by = 'Date',df1 = TRUE)

write.table(df3,file = "df3.csv",sep = "," )

df3>

在导出 df3 之前，我的所有列都是数字列，但在导出后它们被转换为逻辑列，因此我执行以下操作：

df3 <- read_csv("df3.csv",col_types = cols(Date = col_date(format = "%d/%m/%Y")))

cols <- c(sapply(df3,is.logical))
Q[cols] <- lapply(df3[cols],as.numeric)

但是一旦我再导出一次，数据框就会恢复逻辑，这会影响我的后续功能。

我的疑问是：

如何在导出数据框时保留列的数值类。