Fatal编程技术网
  • r/
  • R 如何将条形图/绘图分配给变量并在后期调用

R 如何将条形图/绘图分配给变量并在后期调用

r plot

R 如何将条形图/绘图分配给变量并在后期调用,r,plot,R,Plot,如何将plot分配给变量，并在后期将其打印出来？ 使用latticexyplot可以轻松完成以下操作： s <- xyplot((1:10)^2~1:10) s 我得到的是函数中的条形图： funbar <- function(x) { barplot(x) } variab <- funbar(1:10) # this plots the data 我找不到关于这个明显部分的任何信息。plot=FALSE在这里没有帮助 编辑：以下是条形图的数据取自？条形图 a <-

如何将
plot
分配给变量，并在后期将其打印出来？ 使用lattice
xyplot
可以轻松完成以下操作：

s <- xyplot((1:10)^2~1:10)
s
我得到的是函数中的
条形图
：

funbar <- function(x) { barplot(x) }
variab <- funbar(1:10) # this plots the data
我找不到关于这个明显部分的任何信息。
plot=FALSE
在这里没有帮助

编辑：以下是条形图的数据取自
？条形图


a <- plot((1:10)^2,1:10)



require(grDevices) # for colours
tN <- table(Ni <- stats::rpois(100, lambda = 5))
r <- barplot(tN, col = rainbow(20))



require（GR设备）#用于颜色

tN也许这可以通过
xy.coords
解决：


a <- xy.coords((1:10)^2,1:10) #plots nothing


我是通过检查
plot.default
的代码得出这个想法的


至于
barplot
s，也许
rect
函数将实现类似的功能（因为这似乎是
barplot.default
的核心功能）。
谢谢，它似乎适用于
绘图
，但事实上，我需要它用于
条形图
，在那里我得到erorr:
错误在-0.01*高度…
@Maximilian那么，你能使用条形图添加一个示例吗？我只是在中编辑了一些可能有用的东西，但没有任何东西可以测试它。也许可以看看
recordPlot（）
。（还有其他的可能性，但是如果没有更多关于为什么要这样做的信息，很难说哪一个最有用。）谢谢Josh，
recordPlot（）
确实帮了忙！

layout(matrix(1:2, nrow=2, ncol=1))
tN <- table(Ni <- stats::rpois(100, lambda = 5))
r <- barplot(tN)
tN <- table(Ni <- stats::rpois(100, lambda = 5))
r <- barplot(tN)



a <- xy.coords((1:10)^2,1:10) #plots nothing



plot(a)