r 凯的Rprofile

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了r 凯的Rprofile相关的知识,希望对你有一定的参考价值。

.view <- function(data, withFilter=TRUE, ...) {
  # data: a data.frame or a list of data.frames; could be extend to take multiple data.frames.
  # withFilter: whether to apply a filter to make sorting and filtering easier
  # ...: pass to openxlsx::writeData function
  require(openxlsx)
  options("openxlsx.dateFormat" = "yyyy-mm-dd")
  pars <- match.call()
  wb <- createWorkbook()
  if (is.data.frame(data)) {
    addWorksheet(wb, sheet=as.character(pars$data))
    writeData(wb, sheet=as.character(pars$data), data, rowNames = FALSE, 
      withFilter = withFilter, keepNA=FALSE, ...)
  } else if (is.list(data) & length(data) > 1) { # preview the list of data.frame
    dfs <- sapply(data, is.data.frame)
    addres <- lapply(names(data)[dfs], function(x) {
      addWorksheet(wb, sheet=x)
      writeData(wb, sheet=x, data[[x]], rowNames = FALSE, 
        withFilter = withFilter, keepNA=FALSE, ...)
    })
  }
  openXL(wb)
}

以上是关于r 凯的Rprofile的主要内容,如果未能解决你的问题,请参考以下文章

r .Rprofile.r

r 我的.Rprofile

检测 R 中的操作系统(例如,用于自适应 .Rprofile 文件)

RStudio 不执行来自 Rprofile.site 的“系统”命令

NOIP2017 小凯的疑惑

生信攻略R,perl,python等软件常见更新设置