在R中设置数据

Question

我想按行名在R中获取我的数据的子集，但是出现流动错误。

mydata是我的主要数据文件，我想通过行名得到它的子集。

我的尝试是：

data<-mydata[c("hsa-miR-150" , "hsa-miR-16" , "hsa-miR-192" , ..`enter code here`..)] 

和我：error: unexpected string constant in "sa-miR-16" , "hsa-miR-192" ,.... 也是我尝试这样做：

attributes(Arow) 
$levels 
[1] "hsa-miR-150" "hsa-miR-16"  "hsa-miR-192" "hsa-miR-194" "hsa-miR-19a" 
[6] "hsa-miR-19b" "hsa-miR-22" 
> p<-matrix(nrow=16, ncol=1) 
> p<-matrix(nrow=16, ncol=1, Arow) 
> y<-mydata[p] 
> dim(y) 
>NULL 

而且，即使这个简单的代码并没有为我工作：

y<-c("hsa-miR-150" , "hsa-miR-16" , "hsa-miR-192" , "hsa-miR-194" , "hsa-miR-19a", "hsa-miR-19b" , "hsa-miR-22" , "hsa-miR-223" , "hsa-miR-23a" ,"hsa-miR-23b" ,"hsa-miR-25" , "hsa-miR-30b" ,"hsa-miR-30c" , "hsa-miR-425" , "hsa-miR-486-5p" "hsa-miR-92a") 
Error: unexpected string constant in "sa-miR-16" , "hsa-miR-192" , "hsa-miR-194" , "hsa-miR-19a", 

有人可以告诉我，这里怎么了？我该怎么办？

Answer 1

首先阅读本文：How to make a great R reproducible example?。

然后取出enter code here后的行列表中添加逗号：

data <- mydata[c("hsa-miR-150", "hsa-miR-16", "hsa-miR-192"), ] 

然后，你可以在这里添加缺少逗号：

y <- c("hsa-miR-150", "hsa-miR-16", "hsa-miR-192", "hsa-miR-194", 
     "hsa-miR-19a", "hsa-miR-19b", "hsa-miR-22", "hsa-miR-223", 
     "hsa-miR-23a", "hsa-miR-23b", "hsa-miR-25", "hsa-miR-30b", 
     "hsa-miR-30c", "hsa-miR-425", "hsa-miR-486-5p", "hsa-miR-92a") 

Answer 2

此错误一般涉及到丢失的语法，如一个逗号或者一个=。你的最后一个例子是缺少一个逗号，最后两个项目没有用逗号分开。这工作：

y<-c("hsa-miR-150" , "hsa-miR-16" , "hsa-miR-192" , "hsa-miR-194" , "hsa-miR-19a", "hsa-miR-19b" , "hsa-miR-22" , "hsa-miR-223" , "hsa-miR-23a" ,"hsa-miR-23b" ,"hsa-miR-25" , "hsa-miR-30b" ,"hsa-miR-30c" , "hsa-miR-425" , "hsa-miR-486-5p", "hsa-miR-92a") 

R，像任何编程语言，是一个正式的语言，其中很重要的是使用正确的语法。所以，当你编写代码时，请仔细检查你是否使用了正确的语法。