错误R csv:read.table（file=file，header=header，sep=sep，quote=quote，：'；文件'；必须是字符串或连接）中的错误

我正在为MiRLAB软件包编写一个R教程，尽管我不确定这个问题是否与软件包的功能有关

我想使用函数

Pearson（）

，它只接受.csv文件。我完全加载了一个文件，但当我尝试函数

Pearson（）

时（MI、IDA和Lasso也会出现同样的情况），出现以下错误消息：

read.table（file=file，header=header，sep=sep，quote）中出错= 引号，：“文件”必须是字符串或连接

关于如何更改文件或命令行以使其被函数识别，您有什么想法吗？可能是csv文件有问题还是其他问题？在本教程的示例中，文件直接取自软件包，因此不包括此方法

提前感谢

以下是一个示例：

# working:
# create csv file with "," seprator
write.table(x = mtcars, file = "data.csv", sep = ",", row.names = F)
Pearson(datacsv = "data.csv", cause = 2:3, effect = 3:4)

#           cyl      disp
#disp 0.9020329 1.0000000
#hp   0.8324475 0.7909486


# not work:
# create csv file with ";" seprator
write.table(x = mtcars, file = "data1.csv", sep = " ; ", row.names = F, col.names = F)
Pearson(datacsv = "data1.csv", cause = 2:3, effect = 3:4)

内部read.csv使用默认的seperator“，”

---

只要更改文件并用逗号替换所有分号

我终于解决了这个问题，即使它看起来不是一个干净的解决方案，它也能工作。我想问题是，当我将原始文件带到控制台时，在原始文件中添加了一些额外的“”，因此我重写了文件，并将最近创建的文件重新添加到控制台

RNA <- read.table("RNA.csv", dec = ",", sep = ";", stringsAsFactors = FALSE, header = TRUE, blank.lines.skip = TRUE)
tRNA <- t(RNA)
write.table(tRNA, file = "tRNA_2.csv", quote = FALSE, dec = ".", sep = ",", qmethod = "escape")
tRNAt <- read.csv("tRNA_2.csv")

miRNA <- read.table("miRNA.csv", dec = ",", sep = ";", stringsAsFactors = FALSE, header = TRUE, blank.lines.skip = TRUE)
tmiRNA <- t(miRNA)
write.table(tmiRNA, file = "tmiRNAt.csv", quote = FALSE, dec = ".", sep = ",", qmethod = "escape")
tmiRNAt <- read.csv("tmiRNAt.csv")

dataset <- cbind2(x=tmiRNAt, y = tRNAt)
write.table(dataset, file = "dataset_2.csv", quote = FALSE, dec = ".", sep = ",", qmethod = "escape")

# MiRLAB:
library(miRLAB)
cause = 1:278
effect = 279:length(dataset)
ps = Pearson("dataset_2.csv", cause = cause, effect = effect)

---

RNA我认为您应该使用：pearson=pearson（“ArabPrueba1.csv”，因果），当我这样做时，出现的错误是：error in read.table（file=file，header=header，sep=sep，quote=quote，：比列名更多尝试使用逗号分隔而不是分号您的csv文件是否有标题？read.csv与分号配合使用很好，但在函数中使用时以某种方式失败。我还尝试了
pearson=pearson（read.csv（“arabrueba1.csv”，sep=“；”），原因，结果）
但是，我得到的错误是read.table中的
错误（file=file，header=header，sep=sep，quote=quote，：“file”必须是字符串或连接
。
RNA <- read.table("RNA.csv", dec = ",", sep = ";", stringsAsFactors = FALSE, header = TRUE, blank.lines.skip = TRUE)
tRNA <- t(RNA)
write.table(tRNA, file = "tRNA_2.csv", quote = FALSE, dec = ".", sep = ",", qmethod = "escape")
tRNAt <- read.csv("tRNA_2.csv")

miRNA <- read.table("miRNA.csv", dec = ",", sep = ";", stringsAsFactors = FALSE, header = TRUE, blank.lines.skip = TRUE)
tmiRNA <- t(miRNA)
write.table(tmiRNA, file = "tmiRNAt.csv", quote = FALSE, dec = ".", sep = ",", qmethod = "escape")
tmiRNAt <- read.csv("tmiRNAt.csv")

dataset <- cbind2(x=tmiRNAt, y = tRNAt)
write.table(dataset, file = "dataset_2.csv", quote = FALSE, dec = ".", sep = ",", qmethod = "escape")

# MiRLAB:
library(miRLAB)
cause = 1:278
effect = 279:length(dataset)
ps = Pearson("dataset_2.csv", cause = cause, effect = effect)