Excel数据导入R，如何导入成列表形式

RT，本人需要用下面这个函数录入数据（Polysat包中的函数）
Genotypes(mygen, loci="lG") <- list(c(120, 124, 130, 136), c(122, 120),c(128, 130, 134))

因为数据都存储在excel中，首先需要将excel中的数据导入到R中，但read.table函数默认将数据存储为数据框的形式，而且这个函数不识别NA（数据里有NA会报错），请问各位大神，有没有什么方法能把数据转化为合适的格式？

jxapp_6451 发表于 2016-11-10 02:43
列表里会多出信息，
试了一下只有这样能返回需要的结果
然后尝试了这个循环无果

I would not worry about the attributes. It would not hurt and you will be able to use the elements of the list the same way as a vector without any attributes.

If you insist on non-attribute vectors in the list:

1. lapply( list(a, b, c), function(v) v[!is.na(v)] )

复制代码

In your loop you will have to replace

1. D[i]=D[i][!is.na(D[i])]

复制代码

by

1. D[i]<<-D[i][!is.na(D[i])]

复制代码

to make it work.

可以把数据框转为list啊

johnmy 发表于 2016-11-8 02:26
可以把数据框转为list啊

那具体怎么操作？我还是小白刚接触R，，

as.list

johnmy 发表于 2016-11-9 04:14
as.list

那该怎么去掉list里面的NA呢？

比如

> list(a,b,c)
[[1]]
[1] 120 124 130 136

[[2]]
[1] 122 120  NA  NA

[[3]]
[1] 128 130 134  NA

我想转换成

> list(a,b,c)
[[1]]
[1] 120 124 130 136

[[2]]
[1] 122 120

[[3]]
[1] 128 130 134

这要怎么做

1. lapply( list(a,b,c), na.exclude )

复制代码

1. > lapply( list(a,b,c), na.exclude )
   
2. [[1]]
   
3. [1] 120 124 130 136
   
4. 
   
5. [[2]]
   
6. [1] 122 120
   
7. attr(,"na.action")
   
8. [1] 3 4
   
9. attr(,"class")
   
10. [1] "exclude"
    
11. 
    
12. [[3]]
    
13. [1] 128 130 134
    
14. attr(,"na.action")
    
15. [1] 4
    
16. attr(,"class")
    
17. [1] "exclude"

复制代码

列表里会多出信息，
试了一下只有这样能返回需要的结果

1. Dfrm=data.frame(Allele1=a,Allele2=b,Allele3=c)
   
2. D=as.list(Dfrm)
   
3. D$Allele3=D$Allele3[!is.na(D$Allele3)]

复制代码

然后尝试了这个循环无果

1. for (i in 1:3){
   
2. D[i]=D[i][!is.na(D[i])]
   
3. }

复制代码

大神们有知道怎么解决的吗

zhangyangsmith 发表于 2016-11-7 22:23
I would not worry about the attributes. It would not hurt and you will be able to use the elements ...

问题解决了！十分感谢！