将每行数据绘制为单独的图形

Question

我有一个7列的制表符分隔文件，如下所示：

Name    Length  name2   Sum1    Sum2    FP  RC
X1  10  gene1   39  24  0.32    18 3640 315 1913 2907 1495 281 130 455 239
X2  6  gene2   8  43  0.19    10 20 30 40 50 33 22 12

第7列RC有多个以空格分隔的值。每行第7列中的值数等于第2列Length中的数字。例如，在以X1开头的行中，第2列表示第7列中有10个值。

我想为每一行绘制一个图形，我想将它们保存为2个单独的图形gene1.pdf和gene2.pdf。

x轴的取值范围为1到10（以X1行为例），y轴为18,3640等。

我怎样才能在R？

中这样做

Answer 1

她是答案

＃循环遍历yeast_table的行并绘制

for (i in 1:nrow(yeast_table)){
  #open a pdf file 
  pdf(file=paste(yeast_table[i,3],".pdf",sep=""),width=10,height=5)
  counts <- as.numeric(strsplit(yeast_table[i,7], " ")[[1]])
  vec <- 1:yeast_table[i,2]
  plot(vec,counts,type="l",main=yeast_table[i,3],xlab="CODON",ylab="COVERAGE",col="blue")
  #close the pdf file
  dev.off()
}