r - 如何像 print 一样格式化对象的字符串表示形式？

Question

我想将命名的 num 向量格式化为字符串，以添加为绘图上的文本标签。我希望字符串的格式与print. 有没有这样的函数print而不是打印到控制台返回一个字符串？这是一个工作代码片段。我想toString用一个包含矢量元素名称的函数替换。

library(lattice)
lm <- lm(hp ~ disp, mtcars)
xyplot(hp ~ disp, mtcars, type = c('p', 'r'),
    panel = function(...) {
        panel.xyplot(...)
        panel.text(median(mtcars$disp), lm$coefficients[1], toString(lm$coefficients))
    })

谢谢，
肖恩

Answer 1

如果要在绘图区域中绘制文本，则需要使用用户坐标，并且前两个参数需要是以下文本向量的 x 和 y 位置：

panel.text(x=c( 100,100, 150,150) ,y=c(300, 290, 300, 290), 
           c(  names(lm$coefficients), round(lm$coefficients, 2) )

Answer 2

我认为您正在寻找的是names()（看看?names）。

它返回对象的值标签。