R、 regsubset摘要：如何在打印中跳过force.in

我有一个数据集cigs，我可以调用它

q=regsubsets（销售~年龄+HS+收入+黑人+女性+价格，数据=香烟，方法=“详尽”）

我想在总结（q）中跳过以下部分：

子集选择对象
调用：regsubsets.formula（销售~年龄+HS+收入+黑人+女性+
价格，数据=cigs，方法=“详尽”）
6个变量（和截距）
被迫进入被迫离开
年龄假假假
假假假
虚假收入
黑假假
女假假假
价格虚假
1个子集，每个大小最多6个

只保留他的部分：

选择算法：穷举
年龄HS收入黑人女性价格
1  ( 1 ) " " " " "*"    " "   " "    " "
2  ( 1 ) " " " " "*"    " "   " "    "*"
3  ( 1 ) "*" " " "*"    " "   " "    "*"
4  ( 1 ) "*" " " "*"    "*"   " "    "*"
5  ( 1 ) "*" " " "*"    "*"   "*"    "*"
6（1）“*”“*”“*”“*”“*”“*”

---

你知道我能不能做到吗？我尝试了捕获。输出，但它将“转换为”，我无法将其转换回…

根据您提供的代码，这将为您提供输出：

summary(q)$outmat

---

模型的

summary

上的

outmat

仅返回矩阵。

是否

capture.output

仅添加反斜杠？因为它是可以取出的。使用capture.output，我得到了如下内容

“1（1）\”\“\”\“\”\“\”\“*\”\“\”\“\”\“\”\”

。我一直在尝试

gsub（（[\\]），“”，str）

但我一直得到相同的结果…比较

print（str）

和

cat（str）

它看起来像是R添加了反斜杠，但这只是一种打印方法。是的，但我想用knitr在pdf中显示结果，这些额外的反斜杠使人难以阅读：-（。