我刚刚开始使用名为 RMySQL 的 R 包,以解决我计算机上的一些内存限制。我正在尝试在 R 中获取一个包含 100 列的矩阵(称为 data.df),然后在具有“100 选择 2”(=4950)列的 SQL 数据库上创建一个新表,其中每列是两个的线性组合来自初始矩阵的列。到目前为止,我有这样的事情:
countnumber <- 1
con <- dbConnect(MySQL(), user = "root", password = "password", dbname = "myDB")
temp <- as.data.frame(data.df[,1] - data.df[,2])
colnames(temp) <- paste(pairs[[countnumber]][1], pairs[[countnumber]][2], sep = "")
dbWriteTable(con, "spreadtable", temp, row.names=T, overwrite = T)
for(i in 1:(n-1)){
for(j in (i+1):n){
if(!((i==1)&&(j==2))){ #this part excludes the first iteration already taken care of
temp <- as.data.frame(data.df[,i] - data.df[,j])
colnames(temp) <- "hola"
dbWriteTable(con, "spreadtable", value = temp, append = TRUE, overwrite = FALSE, row.names = FALSE)
countnumber <- countnumber + 1
}
}
}
我也尝试过使用 RMySQL::dbWriteTable() 的“field.types”参数,这是在RMySQL dbWriteTable with field.types建议的。可悲的是,它并没有帮助我太多。
问题:
- 使您自己的 sql 数据库成为 R 的内存绑定性质的有效解决方案,即使它有 4950 列?
- dbWriteTable() 是在这里使用的正确函数吗?
- 假设前面两个问题的答案都是“是”……为什么这不起作用?
谢谢你的帮助。
[编辑]:带有错误输出的代码:
names <- as.data.frame(index)
names <- t(names)
#dim(names) is 1 409
con <- dbConnect(MySQL(), user = "root", password = "password", dbname = "taylordatabase")
dbGetQuery(con, dbBuildTableDefinition(MySQL(), name="spreadtable", obj=names, row.names = F))
#I would prefer these to be double types with 8 decimal spaces instead of text
#dim(temp) is 1 409
temp <- as.data.frame(data.df[,1] - (ratios[countnumber]*data.df[,2]))
temp <- t(temp)
temp <- as.data.frame(temp)
dbWriteTable(con, name = "spreadtable", temp, append = T)
在数据库中成功创建了表(我稍后会更改变量类型),但是 dbWriteTable() 行会产生错误:
Error in mysqlExecStatement(conn, statement, ...) :
RS-DBI driver: (could not run statement: Unknown column 'row_names' in 'field list')
[1] FALSE
Warning message:
In mysqlWriteTable(conn, name, value, ...) : could not load data into table
如果我稍作更改,我会收到不同的错误消息:
dbWriteTable(con, name = "spreadtable", temp, append = T, row.names = F)
和
Error in mysqlExecStatement(conn, statement, ...) :
RS-DBI driver: (could not run statement: Unknown column 'X2011_01_03' in 'field list')
[1] FALSE
Warning message:
In mysqlWriteTable(conn, name, value, ...) : could not load data into table
我只想将“名称”用作一堆列标签。他们最初是约会。我想成为“温度”的实际数据。