带有日期的R数据帧将以QR码形式写入MySQL

Question

我有一个带有日期列的数据框。数据是从csv文件中读取的，在R中的读取方式为character。以下是df的一个可重现的小示例

structure(list(dateofint = c("17/05/2025", "16/06/2017"), market = c(1L, 
1L)), row.names = 4:5, class = "data.frame")

内容如下：

  dateofint market
4 17/05/2025      1
5 16/06/2017      1

我正在将字符日期转换为R中的日期。

df$dateofint <- as.Date(df$dateofint,format = "%d/%m/%Y")

mysql表变量定义如下：

create table test(
dateofint date,
market int(1));

我正在将数据帧写入mysql表，如下所示：

library(RMySQL)
mydb <- dbConnect(MySQL(), host="localhost",user="root",password="a1b2c3",db="testdb")
dbWriteTable(mydb, value = df, name="test", append=TRUE,row.names = FALSE)

当我从mysql表中读取日期时，dateofint列显示为

0000-00-00
0000-00-00

如何获取R中正确的日期格式，以便它以dd/mm/yyyy格式写入日期。以这种格式使用它对我很重要，因为我已在mysql表上启用了CRUD功能。