当我尝试从fileInput读取csv时，如何处理错误的csv分隔符错误

Question

我试图将文件上传到我的闪亮应用中。 用户应该能够选择csv文件和列分隔符。

但是当用户选择错误的分隔符时，我的应用程序无法使用此文件中的列。我想要的是处理这个错误的分隔符并要求用户选择正确的分隔符。

我尝试了一些验证（检查读取的第一行数据向量的长度），但我的代码中缺少一些东西，因为它通过验证部分代码而没有错误消息：

observeEvent(input$button1, {
    input_file <- input$input_file
    if (is.null(input_file))
        return(NULL)
    else{
        data_stream <<- DSD_ReadCSV(input_file$datapath, header=input$file_header, sep=input$file_sep, quote=input$file_quote, loop = TRUE)

        validate(
             need(length(get_points(data_stream,1)) > 1, "Error while loading file"), 
             "Wrong file format or file separator, try again to choose file or to check separator settings!"
             ) 
    }
})