我来给你一步步讲清楚怎么实现和edgeR一样的效果，让用户能轻松打开你的额外PDF文档：

• 第一步：放置PDF文件
  把你的额外PDF文档复制到包的inst/doc目录下，这样包安装完成后，这个文件会被自动同步到包安装路径里的doc文件夹中，确保文件能被正确找到。

• 第二步：编写访问函数
  在你的包的R目录下新建一个脚本（比如命名为doc_utils.R），然后添加下面的函数代码，记得替换里面的占位符哦：

  #' 打开包的额外PDF说明文档
  #'
  #' 调用这个函数可以快速打开包中附带的独立PDF文档
  #' @export
  yourPackageGuide <- function() {
    # 替换成你的PDF文件名和包名
    pdf_file <- "your_custom_doc.pdf"
    pkg_name <- "yourPackageName"
    
    pdf_path <- system.file("doc", pdf_file, package = pkg_name)
    
    # 检查文件是否存在
    if (pdf_path == "") {
      stop("未找到指定的PDF文档，请确认包安装完整或文件名无误。")
    }
    
    # 根据系统类型调用默认阅读器
    if (.Platform$OS.type == "windows") {
      shell.exec(pdf_path)
    } else if (.Platform$OS.type == "unix") {
      if (Sys.info()["sysname"] == "Darwin") {
        system(paste0("open ", shQuote(pdf_path)))
      } else {
        system(paste0("xdg-open ", shQuote(pdf_path)))
      }
    } else {
      warning("当前系统暂不支持自动打开PDF，请手动前往以下路径查看：", pdf_path)
    }
  }
  

  这里我优化了系统判断，对macOS和Linux做了区分，还加了路径转义，避免文件名带空格出问题。

• 第三步：确保函数可被调用
  函数上方的#' @export标签很重要，它会告诉roxygen2在生成NAMESPACE文件时导出这个函数，这样用户安装包后就能直接调用yourPackageGuide()了。如果不用roxygen2，也可以手动在NAMESPACE里添加export(yourPackageGuide)。

• 第四步：测试验证
  重新安装你的包，然后在R里调用yourPackageGuide()，应该就能自动用系统默认的PDF阅读器打开你的文档啦，和edgeR的edgeRUsersGuide()用法完全一致。

内容的提问来源于stack exchange，提问作者January