将 csv 文件读取为矩阵并在 R 中使用条件 if 更改条目

Question

我有 csv 文件，我想将其作为数据框或矩阵读取。我成功读取了 .csv 文件，但是当我想根据条件 if 语句更改条目时，它不起作用。 csv文件可以在这里下载mydata

我想将此 .csv 文件作为矩阵或数据框读取。然后，我想根据某些条件将条目更改为“YES”或“NO”。我试过这个：

mydata = read.csv("mydata.csv")
mydata = data.frame(mydata)
ifelse(mydata>0.005, "YES", "NO")
mydata

但是，我得到的结果是 和

我试过了

mydata = 
read.csv("/home/hudamoh/scRNAspatial/binomial/tangram_output.csv")
myresult = data.frame(mydata)
myresult[myresult>0.0005] <- "YES"
myresult[myresult<=0.0005] <- "NO"
myresult

但我得到的输出是有些没有更改为“YES”或“NO”。我也希望它看起来像矩阵，其中行应该是 0、1、9。请帮忙。

Answer 1

试试这个：

myresult <- as.data.frame(lapply(mydata, function(v) ifelse(v > 0.005, "YES", "NO")))

请注意，这里的mydata 不是一个数组，而是一个数据框，即带有data.frame 类的向量列表。以上将ifelse 应用于每一列。

或者，也可以一次将ifelse 应用于整个数据帧。然而，结果不是数据帧而是矩阵：数据帧首先被转换为矩阵，以便能够将ifelse 应用于所有矩阵元素的向量，而您不能直接使用数据帧执行此操作。然后，您可以将结果转换回数据框：

myresult <- as.data.frame(ifelse(mydata > 0.0005, "YES", "NO"))

请注意，您的数据框有 3468 列。 read.csv 函数默认假定第一行包含变量名。因为它们是数字，所以 R 在前面加上一个 X，因此出现了奇怪的 Xnnnn。如果第一行包含数据，则传递一个选项：

read.csv("mydata.csv", header = F)

变量名则为 V1、V2...V3468。

Answer 2

在第二种情况下，应该在更新之前创建逻辑矩阵，即

i1 <- myresult>0.0005

一旦我们更新为“YES”，它的类型就会更改为character，因此当我们第二次更新时，它就不起作用了。此外，最好不要两次执行相同的步骤，而是执行一次，存储为对象并继续使用它，即在第二种情况下，我们只需要否定 (!) 以便 TRUE -> FALSE 和 @987654325 @

myresult[i1] <- "YES"
myresult[!i1] <- "NO"

---

在ifelse 的第一种情况下，问题在于ifelse 作为“测试”应用于逻辑“矩阵”，它在剥离dim 属性的同时返回vector。为了保留dim的属性，我们可以在赋值时使用[]

mydata[] <- ifelse(mydata > 0.005, "YES", "NO")