仅在生成空数据框的情况下，如何将行添加到 R 中的空数据框？答案

【问题标题】：How to add rows to empty data frames in R based only if empty data frame generated?仅在生成空数据框的情况下，如何将行添加到 R 中的空数据框？
【发布时间】：2015-08-02 04:50:09
【问题描述】：

从这个问题出发： How to add rows to empty data frames with header in R?

如果我碰巧生成了一个空的数据框（在我尝试运行代码之前，我不一定知道哪个是空的，哪个将包含数据）我可以构建应急：“如果数据框是空的然后为所有列分配零，如果数据框有数据，请保留该数据。” ?

谢谢！

如果有帮助，我可以尝试分享一些代码，但如果我们可以使用相关示例中的代码，那将对我有很大帮助。

【问题讨论】：

我喜欢它的外观，但我收到此错误：as.Date.numeric(value) 中的错误：必须提供'origin' 另外：有 50 个或更多警告（使用 warnings() 查看前 50 条警告消息：1：在 [<-.factor(*tmp*, iseq, value = 0) 中：无效因子水平，NA 生成
有人建议：if(nrow(data)==0) data[1,]
我的函数基于另一个链接中显示的数据集。如果您的数据集有因子列，它可能会给出警告，如图所示。您可能需要使用示例和基于此的预期输出来更新帖子
我建议并发表评论作为解决方案
stackoverflow.com/questions/27750484/… 这似乎是相关的，但我还不确定如何使用它。

标签： r if-statement rbind

【解决方案1】：

试试

 f1 <- function(dat){
  if(nrow(dat)==0){
    dat[1,] <- 0
         }
   else dat
   dat}

使用链接中的数据，

 f1(compData)
 #  A B
 #1 0 0

【讨论】：