Question

我一直在尝试使用R中的textplot，并且不确定我的问题是否可行，我知道par（）不能用于在一个图中放置两个文本图。我一直在使用一个页面和这段代码来尝试解决问题。

我的问题是：是否有可能在同一个情节中有两个文本图？例如，在下面的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")

我想要做的是在原始图下面的该图中放置第二个文本图。为了论证，在图中复制该文本图两次。

这可能吗？

谢谢！

Answer 1

也许你已经在过去的四个月中弄明白了，但我还是认为我还是会回答。

提供的代码大部分都是为了满足您的需求，您只需要为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)

一个情节中的两个文本图

1 个答案: