R脚本不产生任何输出

Question

我最近正在学习r脚本的一个需求，当我尝试运行这个脚本和样本数据时，它给我0列和0行作为结果。我不确定是什么原因。谁能告诉我这个脚本出了什么问题？

clinAct<- data.frame(
`Pr # Required Subj`= 1:5,
'Pr # enrolled'= as.Date(c("2010-01-05", "2019-01-07", "2020-01-03", "2010-01-04", "2020-01-05")),
'Pr L Subj Enr Exp'= as.Date(c("2021-03-30","2021-03-30","2021-02-09", "2010-01-04", "2020-01-05"))
)

target <- function() {
  first_column <- data.frame(
    Date = clinAct$`Pr L Subj Enr Exp`,
    `# Required Total` = clinAct$`Pr # Required Subj`,
    check.names = F
    )
  return(list(first_column))
  }

target()

Answer 1

正如评论中提到的，data.frame正在“修复”您的列名，以删除空格和特殊字符。您可以很容易地检查这一点。

> colnames(clinAct)
[1] "Pr...Required.Subj" "Pr...enrolled"      "Pr.L.Subj.Enr.Exp" 

要么使函数中的代码适应更改后的列名，要么-如果确实需要保留上面指定格式的列名-在设置clinAct时设置check.names = F，就像定义first_column时在函数中已经执行的操作一样。

话虽如此，我并不真正明白您想要做什么，但我怀疑您可能能够更优雅地使用dplyr :)