gpt4 book ai didi

R - 作为数字矩阵

转载 作者:行者123 更新时间:2023-12-02 05:10:56 25 4
gpt4 key购买 nike

我是 R 的新手,我正在尝试使用以下代码将数据帧转换为数字矩阵

expData <- read.table("GSM469176.txt",header = F)
expVec <- as.numeric(as.matrix(exp_data))

当我使用 as.matrix 而不使用 as.numeric 时,它会返回一些数字(如下所示)

0.083531    0.083496    0.083464    0.083435    0.083406    0.083377    0.083348"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                
[9975] "-0.00285 -0.0028274 -0.0028046 -0.0027814 -0.0027574 -0.0027319 -0.0027042

但是当我输入 as.numeric 时,它们都被转换为“NA”

如果之前有人问过这个问题,我深表歉意,但我找不到解决我问题的帖子。提前致谢

最佳答案

您有 2 个问题。首先,如果您检查数据框的结构,您会注意到第一列是字符:

head(expData)[, 1:4]

V1 V2 V3 V4
1 YAL002W(cer) 6.1497e-02 6.2814e-02 6.4130e-02
2 YAL002W(par) 7.1352e-02 7.3262e-02 7.5171e-02
3 YAL003W(cer) 2.2428e-02 3.8252e-02 5.4078e-02
4 YAL003W(par) 2.6548e-02 3.6747e-02 4.6947e-02
5 YAL005C(cer) 2.4023e-05 2.3243e-05 2.2462e-05
6 YAL005C(par) 2.0252e-02 2.0346e-02 2.0440e-02

因此,尝试将完整的数据框转换为数字将无法按预期工作。

其次,您在 as.matrix() 之后运行 as.numeric(),它将矩阵转换为向量:

x <- as.numeric(as.matrix(expData))
# Warning message:
# NAs introduced by coercion
class(x)
[1] "numeric"
dim(x)
# NULL not a matrix
length(x)
# [1] 14261302

我建议你试试这个:

rownames(expData) <- expData$V1
expData$V1 <- NULL
expData <- as.matrix(expData)
dim(expData)
# [1] 7502 1900
class(expData[, 1])
# [1] "numeric"

关于R - 作为数字矩阵,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/15490006/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com