问题标签 [ggpmisc]

geom_smooth将计算一次数学以绘制趋势线。如果我再添加ggpmisc::stat_poly_eq，它会重新计算第二次数学以获得标签吗？

我正在尝试修改如何在使用R 包stat_regline_equation制作的图上显示回归线方程。具体来说，我想显示一致的系数位数，即使某些舍入系数具有尾随零，这些零通常被删除。这是一个例子：ggscatterggpubr

图 I 很好，图 H 删除了一个尾随零，图 E 完全删除了斜率，因为它四舍五入到 1.00。基于我在这里得到的一个很好的答案以及一个不同的答案，我尝试修改包代码，trace(ggpubr:::.stat_lm, edit = TRUE)用于修改第 13 和 14 行

eq.char <- as.character(signif(polynom::as.polynomial(coefs), 2))

至

eq.char <- as.character(formatC(polynom::as.polynomial(coefs), format = "f", digits = 2))

这就是问题所在：如果您将一个polynom::polynomial对象传递给signifor round，它们会返回另一个polynom::polynomial对象，但对于formatCorsprintf它们会返回字符：

因此，我在上面使用的尝试formatC不起作用。我猜这个polynom::polynomial类有内置的roundand方法signif，而没有内置方法formatC，所以后者的输出是强制的。我可能会尝试修改 的类定义polynom::polynomial，但在这个阶段，我觉得必须有一种更简单的方法来在我的图表上显示的回归方程上获得尾随零。我希望这是一个足够普遍的愿望，有人有一个更简单的解决方案，或者至少一个答案可能对我以外的更多人有用。

我试图在 r/ggplot2 中制作多面图，显示使用 ggpmisc 包生成的 R^2 和 P 值，但根据 P 值是否低于某个数字来格式化每一行。我可以使用单个字符“R”和“P”成功地做到这一点，但我无法获得 R^2 中的上标 2、等号或格式化的值本身。可能使事情复杂化的是，我希望将值四舍五入到小数点后 3 位，我可以这样做，但我再次无法应用格式。这是问题代码和输出：

编辑：my.formula <- y ~ x在代码开头添加了一行代码以使其工作。

我假设paste()inaes(label = ...)不是 basepaste而是 plotmath paste，因为output.type = "expression"andparse = TRUE在stat_poly_eq函数调用中。此外，我已经看到许多使用bquote(), mtext(),substitute()等而不是 的示例paste()，但我无法让他们做我想做的事。另外，我认为这与 ggpmisc 包没有任何关系，而是我不了解如何使用 plotmath 表达式格式化具有可变变量的字符串。

这是我用上面的代码生成的。很难看到，但 R 和 P 在面板 (early, d) 和 (early, e) 中以粗体显示，它们应该是：

这是我想看到的，整行都是粗体：

任何帮助将不胜感激！

我正在绘制一个包裹的 ggscatter ，如下图所示。我想要的是根据 R 和 P 值进行不同的着色。例如，当 P 不显着时，我想要绘图灰色；当 P 显着时，需要根据 R 值以连续比例着色的图。问题是我不知道如何让这些值在 ggscatter 中创建 if 语句。任何人都可以帮助我吗？谢谢！

数据集示例：

阴谋：

我正在尝试将形状添加到回归模型中。这是示例：

对于每个因素，我得到一个带有四条线性线的图。我宁愿只希望“物种”的线性回归线，但“跑”的不同形状（不向图中添加“跑”的回归线）。

此外，我还打算将“R2”更改为 R^2，这是我无法使用当前脚本执行的操作，并将运行的图例更改为“随机”-“Factor1”和“Factor2”。

预先感谢您的帮助。

很抱歉，在这里寻求帮助时，我不知道如何制作可重现的示例。因此，我提供下面的代码和数据；<350 KB 这里（数据：https ://easyupload.io/1r5xuo ），如果你可以看看。

我的问题是：我想要两个 R2 的十进制值（如附图所示），即使我使用了 digits=2，我也无法使用 ggpmisc 的 stat_fit_glance() 函数得到它，但它只显示一个（R2=0.7和 R2=0.9），可能是因为小数点后 1 位的值为零（见图）。

但是，我希望它们为 R2=0.70 和 R2=0.90。

谁能帮我解决这个问题。

示例图

我有一些数据有点拥挤，接近于零。因此，我想对轴使用对数刻度，以便更清楚地了解这些点。但是，当我这样做并使用非常方便ggpmisc::stat_poly_line的功能时，拟合是在缩放数据上完成的。我能以某种方式避免这种情况吗？

下面是我的意思的一个例子。

^{由reprex 包于 2021-09-27 创建(v2.0.1)}

这是我正在使用的数据集的 dput：

所以在我在 R 中运行线性回归之前，我会使用这样的简单代码：

这会给我一个带有这种等式标签的图表：

但是，我正在尝试运行多元线性回归和层次回归，但是当我尝试添加第三个变量时，我不完全确定如何 1) 将第三个变量 (Z) 绘制为回归线和 2) 得到一个适合图形上模型的方程。我正在寻找的是这样的：

我需要绘制的两个模型是 (Y ~ X + Z) 和 (Y ~ X * Z)。到目前为止，我想出的最好的是：

这给了我这个带有 R 平方和散点图颜色的图表，但除此之外没有提供我想要的那么多信息。我该如何解决这个问题，使其看起来更像我正在寻找的模型？

我正在使用 ggplot2 和 ggmics 来生成趋势线。

• 对于g，标签是y = 6.26 - 0.351x
• 对于gg，它是y = 0.782 - 0.0419x

当我使用指数符号时，值会eq.label发生变化。我认为不eq.label应该改变，因为我只是改变轴比例。你能告诉我为什么吗？