2014-07-17 127 views
0

我一直在努力與R在textplot工作,我不確定如果我的問題是可能的或不,我知道par()不能用於放置兩個文本圖形在一個陰謀。我一直在使用一個頁面和這段代碼來嘗試解決問題。在一個陰謀的兩個textplots

我的問題是:是否有可能在同一個圖中有兩個文本圖? 例如,在下面的par(mfrow = c(1,1))方案中,圖1是物種長度的texplot。假設我想在該圖中複製該文本圖兩次。那可能嗎?

基於這個網站: http://svitsrv25.epfl.ch/R-doc/library/gplots/html/textplot.html

textplot(version) 
data(iris) 
par(mfrow=c(1,1)) 
info <- sapply(split(iris$Sepal.Length, iris$Species), 
      function(x) round(c(Mean=mean(x), SD=sd(x), N=gdata::nobs(x)),2)) 

textplot(info, valign="top" ) 
title("Sepal Length by Species") 

我想要做的就是把第二textplot該地塊內,原來下面是什麼。出於參數的原因,在圖中複製該文本圖兩次。

這可能嗎?

謝謝!

回答

0

也許你在過去的四個月裏已經想通了,但是我認爲無論如何我都會有答案。

提供的代碼是完成您所需要的大部分工作,您只需提供一些額外的輸入,即title()和/或par()。即通過使用title("your title", outer = TRUE)指定標題要高於兩個圖,並且您可以使用par()中的選項進一步調整標題的位置,使用par(mfrow = c(2,1), oma = c(0,0,"top",0))。希望這可以回答你的問題。

require('gplots') 

data(iris) 

info <- sapply(split(iris$Sepal.Length, iris$Species), 
      function(x) round(c(Mean = mean(x), SD = sd(x), N = gdata::nobs(x)),2)) 

## Replace top with a numerical value to control the position of the title with respect to the 
## top of the page. 
par(mfrow = c(2,1), oma = c(0,0, top ,0)) 

textplot(info, valign = "top") 
textplot(info, valign = "top") 

title("Sepal Length by Species", outer = TRUE)