`write.dbf` 因类 `tbl_df` 的对象而失败

Question

我对@9​​87654321@ 文件以及dplyr 做了很多工作。 write.dbf() 中有一个错误，它阻止将 tbl_df 对象写入 .dbf 文件。

不幸的是，错误消息写得不好，因此很难弄清楚到底发生了什么。

这是一个 MWE

library(dplyr)
library(foreign)

d <- data_frame( x = 1:4, y = rnorm(4) )
write.dbf(d, "test.dbf")
  Error in write.dbf(d, "test.dbf") : unknown column type in data frame

Answer 1

这里的解决方案是将d的类强制为裸data.frame

class(d)
 [1] "tbl_df"     "tbl"        "data.frame"
df <- as.data.frame(d)
class(df)
 [1] "data.frame"
write.dbf(as.data.frame(df), "test.dbf")  # works

我已向foreign 人提交了一份错误报告，但希望这篇文章可以减轻其他人的痛苦。

Answer 2

我不确定在 foreign 中声明错误是否公平。考虑一下：

library(dplyr)

df <- data.frame(x=1:10, y=11:20)
class(df)
# [1] "data.frame"
mode(df$x)              # as expected
# [1] "numeric"
mode(df[,"x"])          # as expected
# [1] "numeric"

dp <- data_frame(x=1:10, y=11:20)
class(dp)
# [1] "tbl_df"     "tbl"        "data.frame"
mode(dp$x)
# [1] "numeric"         # as expected
mode(dp[,"x"])
# [1] "list"            # WTF?!

R 中有很多很多函数使用，例如，mode(my.data.frame[,"mycolumn"]) 来测试数据框中列的模式，但是对于 tbl_df 对象，返回的模式是“列表”。