相关疑难解决方法(0)

当我尝试read.csv()该文件时,我有一个CSV ,我收到警告警告消息:

In read.table(file = file, header = header, sep = sep, quote = quote,  :
  incomplete final line found by readTableHeader on ...

尽管StackOverflow和R-help用于解决方案,但我无法隔离问题.

这是数据的Dropbox链接:https://www.dropbox.com/s/h0fp0hmnjaca9ff/PING%20CONCOURS%20DONNES.csv

我创建了一个 VBA 代码来删除列中可用的所有特殊字符。举个例子，我在一列的每个单元格中都有一个字母数字字符，其中包含一些特殊字符： 假设在一个单元格中我有一个值： abc@123!-245 执行我的代码后，我得到输出 abc 123 245 这里我的代码工作正常删除所有特殊字符。我的代码如下：

Sub ReplaceSpecial()
    Dim cel As Range
    Dim strVal As String
    Dim i As Long
    Application.ScreenUpdating = False
    For Each cel In Selection
        strVal = cel.Value
        For i = 1 To Len(strVal)
            Select Case Asc(Mid(strVal, i, 1))
                Case 32, 48 To 57, 65 To 90, 97 To 122
                    ' Leave ordinary characters alone
                Case Else
                    Mid(strVal, i, 1) = " "
            End Select
        Next i
        cel.Value = strVal
    Next cel
    Application.ScreenUpdating …