在 R 中上标变量

Question

我是 R 的初学者，我正在尝试将包含上标变量的方程式放在绘图上。我知道如何在图上打印上标字母，但我想不出插入变量的方法。这是我的代码：

DF <- data.frame(X <- c(1, 2, 3, 4, 5, 6, 7), Y <- c(0, 0, 1, 0, 1, 1, 1))

# Logistic regression
model <- glm(Y ~ X, family = binomial, data = DF)

# Plot raw data
raw_plot <- plot(DF$X, DF$Y,
        xlab = 'X', ylab = 'Y'
        )

# Add prediction curve
curve(predict(model, data.frame(X = x), type = 'response'), add = TRUE)

# Get coefficients
intercept <- summary(model)$coefficients[1] # -4.361418
coefficient <- summary(model)$coefficients[2] # 1.250679

superscript.part <- sprintf('%.2f + %.2f*x', intercept, coefficient)

text(5, 0.2, labels = expression(paste('y = 1/(1 + 1/e'^'superscript.part'*')')))
# This will superscript 'superscript' and not the actual variable

这就是我得到的。

有没有办法真正让变量的内容以上标打印出来？感谢您的帮助！

Answer 1

这个有效：

text(5,.2, bquote("y = 1/(1 + 1/e" ^~{.(superscript.part)} ~ ")"))

在 R 中上标变量

Superscripting a variable in R

variables

plot

r

superscript