geom-text

    0热度

    1回答

    plot_data <- rbind( data.frame(year = seq(2018,2027), value = seq(1000,10000,1000), type = 'Type A'), data.frame(year = seq(2018,2027), value = seq(500,5000,500), type = 'Type B')

    2热度

    1回答

    ggplot2将文本自动居中在geom_text图层中。例如: library(ggplot2) library(tidyverse) df <- data_frame(text = c("A short sentence.", "A slightly longer sentence.", "This sentence is the longest of

    1热度

    1回答

    我是R中的新手,我想使用条形图和ggplot将数据可视化。 我有下面的数据,当我想要查看这些数据时,负值的文本不会显示在Bar下面。 dat <- read.table(text = "sample Types Value sample1 A -36 sample2 B 31 sample1 C 15 sample2 D -12 sample1 E 27 sample2 F 16 s

    1热度

    1回答

    我一直在这个小时候挠挠头。我有什么到现在: library(ggplot2) library(grid) all_data = data.frame(country=rep(c("A","B","C","D"),times=1,each=20), value=rep(c(10,20,30,40),times=1,each=20), year = rep(s

    0热度

    1回答

    我正在努力添加一个我想添加到我的ggplot图中的标签。 这里是我的数据集: Group Gaze direction Counts Duration Expert Performers game table 148 1262.122 Expert Performers objects table 40 139.466 Expert Performers other

    0热度

    2回答

    我正在一个相当大的散点图,我使用ggrepel作为避免重叠标签的方法。但是,我需要区分一些数据点,并且这个想法也将依靠size和face来完成。 我将数据集: structure(list(horizontal = c(-0.352696359157562, 0.780073940753937, 0.0911642983555794, -0.153335213661194, -0.5400967

    0热度

    1回答

    作为后续问题值这一个:HERE 是否有可能使用geom_text()的position = position_stack()时要排除的值?例如,类似这样的:在geom_text中定义子集数据并重新定义geom_text(data=subset(Data,Frequency<250), aes(x = Year, y = Frequency),size = 3, position = positio

    0热度

    1回答

    我正在构造一个变量x和y的散点图。每个点都使用geom_text进行标记。 geom_text的大小由第三个变量z控制。 有没有办法指定最小可接受的字体大小?我曾看过this question,但它仅讨论如何将大小设置为固定值。 在下面的示例中,我使用mtcars重现了该问题,其中geom_text的大小由'disp'控制。它可以工作,但某些标签太小而无法阅读(一旦'disp'的值低于约100)。

    0热度

    1回答

    我有我想要在geom_histogram中绘制的数据,并且它有几个要叠加在直方图上的点,然后对它们进行注释(用geom_text或annotate)。 这里的直方图和点: #data library(ggplot2) set.seed(10) df <- data.frame(id = LETTERS, val = rnorm(length(LETTERS))) #points I wa

    0热度

    1回答

    我有数据,我想用ggplot用渐变着色方案,然后注释一些要点。 我的数据: df <- data.frame(id = rep(LETTERS,100), val1 = rnorm(100*length(LETTERS)), val2 = rnorm(100*length(LETTERS)), sig = runif(100*length(LETTERS),0,1)