如何避免乳胶中的索引(编号)?

时间:2012-03-19 01:36:28

标签: r latex sweave

我正在使用Latex和R并使用以下代码。

<<echo=FALSE>>=
infile<-read.table("test.txt",sep="\t")
Col3 <- unique(infile[,3]) 
LCol3 <- length(Col3)
for (i in 1:LCol3) {


print(paste("Column", Col3[i]))
print(infile[infile[,3]==Col3[i],-3])
}
@

我得到以下输出。

1] "Column C"
V1 V2 V4
1 A B D
2 X T K
[1] "Column Z"
V1 V2 V4
3 Z U M
4 E V R
5 Z U M
[1] "Column P"
V1 V2 V4
6 E V R

我想避免编号和列名。我想要我的输出如下。

"Column C"
A B D
X T K

"Column Z"
Z U M
E V R
Z U M

"Column P"
E V R

我该怎么办?

1 个答案:

答案 0 :(得分:2)

一般来说,print是您尝试做的错误工具。您应该使用cat代替。由于您的示例不可重现,这是一个非常简单的示例,说明了一些类似的用法:

d <- data.frame(V1 = LETTERS[1:5],V2 = letters[1:5], V3 = 1:5)

for (i in 1:5){
    cat("Row",i,"\n")
    cat(unlist(d[i,]),"\n\n")
}

Row 1 
A a 1 

Row 2 
B b 2 

Row 3 
C c 3 

Row 4 
D d 4 

Row 5 
E e 5 

请注意,需要取消列出数据框行,以便cat能够合理地将各个元素粘贴在一起。