1

我有一个巨大的数据框(尺寸:600000 X 6)。所有 6 列都是整数值,表示每行的不同特征。我想在所有行共有的数据框上方或下方添加三行文本。是否可以在数据框下方或上方插入一些文本行?

例如:给定一个数据框,

    name<-letters[1:10]
    length<-c(140,50,25,120,156,146,180,98,120,110)
    quality<-c(20,25,35,20,15,28,32,35,29,25)
    df<-data.frame(name,length,quality)

如何在数据框的上方或下方插入三行文本,df:

    No. of reads = 10
    %AT=32
    %GC=30

输出应如下所示:

      name length quality
   1     a    140      20
   2     b     50      25
   3     c     25      35
   4     d    120      20
   5     e    156      15
   6     f    146      28
   7     g    180      32
   8     h     98      35
   9     i    120      29
   10    j    110      25
   No. of reads = 10
   %AT=32
   %GC=30
4

1 回答 1

5

你在寻找这样的东西吗?

prettyprint <- function() {
  print(df)
  cat("No. of reads = 10",
      "\n%AT=32",
      "\n%GC=30")
 }
 prettyprint()

输出看起来像这样:

   name length quality
1     a    140      20
2     b     50      25
3     c     25      35
4     d    120      20
5     e    156      15
6     f    146      28
7     g    180      32
8     h     98      35
9     i    120      29
10    j    110      25
No. of reads = 10 
%AT=32 
%GC=30
于 2013-08-07T14:32:16.820 回答