如何对R中的一维数据执行卡方检验？

Question

我有一个像这样的数据框：

Alamofire.upload(multipartFormData: { multipartFormData in
        multipartFormData.append(expenseImage, withName: "file",fileName: "file.jpg", mimeType: "image/jpg")
        },
with: baseUrl)
{ (result) in
    switch result {
    case .success(let upload, _, _):

        upload.uploadProgress(closure: { (progress) in
            print("Upload Progress: \(progress.fractionCompleted)")
        })

        upload.responseJSON { response in
             print(response.result.value)  
        }

    case .failure(let encodingError):
        print(encodingError)  
    }
}

，我想进行卡方检验，以了解5组之间的差异是否显着。所以我这样做了：

> fr.t.r
     A     B    C    D    E
Freq 13    3    0    0    0

然后我认为观察次数很少，所以我需要做一个精确的测试。但是fisher.test只能在列联表上执行。那么我应该怎么做，就像SPSS一样？