plotmath

    0热度

    1回答

    我无法在网站上的众多相似但不完全相同的问题中找到答案。假设我在变量中有一个字符串,它是我想要使用的plotmath表达式的直接表示,例如, "R^2"。我该如何将它替换成expression,以便它可以绘制为阴谋?我要疯了尝试各种组合,但我不能得到它的工作... # What I want... mn <- "R^2" # Using expression directly to show w

    0热度

    1回答

    我想包含多个指标的标签添加到条形图: data<-as.data.frame(c("A")) colnames(data)<-"A" data$B<-5 ggplot(data, aes(x=A, y=B)) + geom_bar(stat="identity", colour="black", position="dodge", size=0.25, width=0.8, al

    2热度

    1回答

    我想向我的ggplot添加一个表。在该表中,我需要为一些字符值添加一个下标(对于Winsorized平均值和标准偏差)。当我指定parse = TRUE时可以实现这个功能,但是结果我丢失了使用sprintf格式化的尾随零。有没有办法使用plotmath并在我的表中保留尾随零? # exmple data data(iris) # packages library(dplyr) libra

    1热度

    1回答

    我有四种不同的图形,每个图形都转换为grob,并取得了明显的成功。我正尝试将它们与grid.arrange()组合成一个图像。四个中的一个 - 我会说这四个中最简单的 - 会产生一个错误,即使没有其他三个。 grid.text(expression(atop("first line", scriptstyle("second line"))), vjust =

    1热度

    1回答

    我想合并两个用bquote制作的表达式。例如: a = 1 b = 2 x1 = as.expression(bquote(paste("Something ", alpha, " = ", .(a), sep = ""))) x2 = as.expression(bquote(paste("Something else ", beta, " = ", .(b), sep = "")))

    2热度

    1回答

    有没有任何方法来注释一个ggplot与三个一个在另一个上面,而保持文本大小相同的三条线? 我几乎有,但文本大小在三线不同,它看起来像bgroup中只使用前两行,我不能得到这个权利... 我使用添加文本以“顶上”,从“?plotmath”,它工作正常,但在第三行文字出来,在比其他两行不同的大小...应用 library(ggplot2) line1 = "xxx data1" line2 = "

    4热度

    1回答

    下面的代码将绘制一个系统发育树,提示标签以斜体和下划线替换为空格。 library(ape) tr <- rtree(5, tip.label=c("a_b_x1", "b_c_2", "c_d_3y", "d_e_4", "e_f_5")) plot(tr) 如何将规则文本与斜体文本以斜体形式结合在一个发展史的提示标签上?在最后一个下划线显示为普通文本后,我对斜体字母和字母数字段的字母感

    2热度

    1回答

    我试图用10^n的值在每个第三个刻度处标记一个轴,格式化为上标。我正在使用grid图形。我在做一些粗心大意的事情。这里有一个MWE(或我看到有一些运动,称之为reprex): library("grid") grid.newpage() axisVP <- viewport(width = unit(6, "inches"), height = unit(0.01, "inches")) p

    0热度

    1回答

    我正在试图在基本R图例中具有大于或等于符号的标签,后跟从变量中收集的数值。我可以使用Unicode字符下面的代码做到这一点,和bquote功能: data = c(1,2,3,4) paste0("\u2265", bquote(.(data[2]))) 我想知道是否有可能作出这样的标签没有Unicode字符,而引用的一个变量数值。我一直使用嵌套expression,paste,substi

    0热度

    2回答

    我想使用geom_text()(其中^表示上标)将“R^2 = 70%”添加到我的图中。 没有%符号,这很容易: my.data <- data.frame(x=1:5, y=1:5) p1 <- ggplot(my.data, aes(x=x, y=y)) + geom_point() p1 <- p1 + geom_text(x=2.5, y=5, label="R^2 == 70",