Rqc文件格式未检测到或支持r闪亮

时间:2016-02-04 17:26:41

标签: r file-upload shiny fastq

我想上传一个fastq文件并使用Rqc Package渲染一些图,尤其是rqcQA函数。

这是代码:

library(shiny)
library(Rqc)
  ui <- fluidPage(
    titlePanel("Uploading Files"),
    sidebarLayout(
      sidebarPanel(
        fileInput('file1', 'Choose file to upload',
                  accept = c('.fastq')
        )
      ),
      mainPanel(
        plotOutput("plot1")
      )
    ))

  server <- function(input, output) {
      output$plot1 <- renderPlot({
        inFile <- input$file1
        if (is.null(inFile))
          return(NULL)
        # folder <- "D:/sample.fastq"
      rqcResultSet <- rqcQA(inFile$datapath, workers=1)
        rqcReadQualityBoxPlot(rqcResultSet)
      })
  }

  shinyApp(ui, server)

我在阅读输入时遇到错误:

  

'rqcQA':FUN错误(X [[i]],...):未检测到或支持的文件格式:0

当我用inFile$datapath变量替换folder时,我没有收到任何错误:

folder <- "D:/sample.fastq"
rqcResultSet <- rqcQA(folder, workers=1)

我做了一些研究,我在Github中找到了源代码,detectFileFormat.R是包含指定类型格式的函数的文件。

任何帮助将不胜感激。

1 个答案:

答案 0 :(得分:2)

问题是,当您将文件上传到闪亮并且未通过0文件测试时,该文件会重命名为rqcQA。尝试运行:

file.rename(inFile$datapath,inFile$name)
rqcResultSet <- rqcQA(inFile$name,workers=1)

这只是将文件重命名为当前wd中的原始名称。

您可以选择

rqcResultSet <- rqcQA(FastqFile(inFile$datapath))

跳过文件检查。