覆盖地理条形图中Geom_text的Alpha值
是用于控制地理条形图中文字的透明度。Alpha值的范围是0到1，其中0表示完全透明，1表示完全不透明。
在地理条形图中，通常会在每个条形的顶部显示相关的数值或标签，这有助于更好地理解数据的含义。为了避免文字和条形之间的重叠，可以使用Alpha值来调整文字的透明度，以便更好地展示数据。
优势：
- 提高可读性：通过调整文字的透明度，可以使文字更清晰可见，避免与条形重叠，提高数据可读性。
- 突出重点：根据数据的重要性，可以使用不同的Alpha值来突出显示关键信息，吸引用户的注意力。
- 美观效果：适当调整文字的透明度可以提升地理条形图的美观度，使其更具吸引力。
应用场景：
- 数据可视化：地理条形图常用于展示地理相关的数据，如不同地区的销售额、人口数据等。通过调整文字的透明度，可以更好地展示数据细节。
- 报告和演示：在报告和演示中，地理条形图可以用于说明地理数据的分布情况。通过调整文字的透明度，可以使报告和演示更加清晰易懂。
推荐的腾讯云相关产品： 腾讯云提供了丰富的云计算产品和服务，以下是一些推荐的产品和产品介绍链接地址：
- 云服务器（ECS）：腾讯云的云服务器提供灵活可扩展的计算资源，可满足不同规模和需求的应用程序。产品介绍链接
- 云数据库MySQL版（CDB）：腾讯云的云数据库MySQL版提供稳定可靠的数据库服务，支持高性能的数据存储和访问。产品介绍链接
- 人工智能平台（AI）：腾讯云的人工智能平台提供各种人工智能相关的服务和工具，包括人脸识别、语音识别、图像识别等。产品介绍链接
请注意，以上推荐的产品和链接仅作为示例，具体选择适合自己需求的产品应根据实际情况进行评估和选择。
相关·内容
1回答
我试图使用ggtitle()将标题添加到我的圆形条形图中，但在图中找不到标题。我甚至试着调整位置，但都没有用。有没有人能告诉我这个问题？示例输入和代码如下：
grp = c("A","B","C","D","E","F","G","H","I","J")
val= c(104,95,73,65,53,43,30,20,10,5)
data= data.frame(grp,val, stringsAsFactors = TRUE)
gg
浏览 10提问于2021-05-29得票数 1
回答已采纳
我有一个堆叠的比例条形图，所以所有的条形图总和是100%。我想在每个条形图的末尾添加一个标签(即在每个条形图的最右边，而不是在条形图本身内)，以显示每个条形图中的观察总数。 像这样的事情会变得很接近... library(dplyr)
library(ggplot2)
data("mtcars")
mtcars %>%
# prep data
mutate(across(where(is.numeric), as.factor)) %>%
count(am, cyl, gear) %>%
mutate(prop = n / sum(n
浏览 15提问于2020-12-08得票数 1
回答已采纳
1回答
我已经将标签(2016响应率)添加到我的条形图的条形图中，但也希望将标签添加到位于每个条形图中的个人/黑色数据点(2015响应率)。
这是我的代码：
ggplot(merged2[merged2$TrustCode %in% acuteCodes, ], aes(x = TrustName, y = ResponseRate16)) +
geom_bar(fill="white",stat="identity", colour="blue") +
geom_point(aes(x = TrustName, y = Respon
浏览 1提问于2017-03-20得票数 0
1回答
我有一个线状图，它使用alpha作为其比例之一。
不幸的是，似乎有一个错误导致alpha图例无法工作，即使它们在绘图中工作，Hadley已经将其视为Windows错误。
作为一种变通办法，有谁知道如何将图例中的geom从线条更改为方框(以同样的方式显示条形图的填充)？
我已经摆弄了guide_legend的overwrite_aes参数，但是如果这是解决方案，我还没有弄清楚应该使用什么参数。
示例ggplot：
ggplot(data, aes(x = x)) +
geom_line(aes(y = y1, alpha = "test 1")) +
geom_
浏览 0提问于2021-01-07得票数 0
我有一个很大的数据集，可以用下面的mwe举例说明
df <- data.frame("x" = c(1,1,1,2),"value" = c(4,3,5,1), "groupA" = c("A","B","A","B"), "groupB" = c("X","Y","Y","Y"))
df$value <- ifelse(df$groupB == "Y", -df$value,
浏览 6提问于2021-10-20得票数 1
回答已采纳
4回答
我试着在酒吧里显示频率..。好的，我想让他们在图中的某个地方：在条形图下面，在条形图中，在条形图的上方，或者在图例区。我记得(我可能是错的)它可以在ggplot2中完成。这可能很简单..。至少看起来很容易。下面是代码：
p <- ggplot(mtcars)
p + aes(factor(cyl)) + geom_bar()
我是否有可能得到嵌入在图表中的频率？
浏览 4提问于2010-03-31得票数 21
回答已采纳
我有一个堆叠的条形图，我想标记条形图中每个条形图的值。下面是一个示例： diamonds %>%
group_by(cut) %>%
count(low_price = price < 3000) %>%
ggplot() +
aes(
x = cut,
y = n,
fill = low_price
) +
geom_col() +
geom_text(
aes(label = n),
position = position_stack(vjust = 0.8)
) 我使用p
浏览 12提问于2019-05-29得票数 0
回答已采纳
所以我的传说就是这个村庄(奇罗佐，上帝，鲁卡)。如何移除图例并在条形图中显示；例如，在条形图中，我要写在里面？
ggplot(data = interviews_plotting, aes(x = respondent_wall_type, fill = village)) +
geom_bar(position = "fill")
源在这里，
ggplot(data = interviews_plotting, aes(x = respondent_wall_type, fill = village)) +
geom_bar(position = "f
浏览 5提问于2022-11-08得票数 0
我想使用ggplot2为堆叠条形图中的标签自定义不同的大小。 例如，绿色条中的尺寸为4，浅绿色中的尺寸为3，黄色中的尺寸为2，依此类推。下面是一个带有该图的图像的链接。我想不出该怎么做。 这是代码 ggplot(data, aes(x = as.factor(id), y=value, fill = cat, label = value)) +
geom_bar(stat = "identity", alpha=0.5) +
geom_text(size = 2.5, position = position_stack(vjust = 0.7)) +
scale_
浏览 26提问于2020-06-20得票数 1
2回答
我有一个如下的df：
fruit <- data.frame(Sample=1:100,
Fruit=c(rep("Apple", 10), rep("Strawberry", 25), rep("Grape", 20),
rep("Watermelon", 15), rep("Lime", 11), rep("Blueberry", 10),
rep("Plum", 9)),
Co
浏览 0提问于2018-01-29得票数 2
回答已采纳
我是一个绝对的初学者，最近我开始使用优秀的ggplot包。我有一个关于在条形图中使用position = "identity“的问题。我在互联网上搜索了一下，发现了这个：然而，它们与geom_bar()无关
A)第一张图：(工作良好)
ggplot(diamonds, aes(color, fill = cut)) +
geom_bar()
这将绘制基于“剪切”的频率(y轴) wrt颜色和填充。我对此很在行。
B)现在，在第二张图中，我不确定发生了什么：
ggplot(diamonds, aes(color, fill = cut)) +
geom_bar(position =
浏览 7提问于2016-08-24得票数 2
回答已采纳
我目前正在编写一份基于一个名为"esoph“的数据集的报告(IIRC，它在R中可用，但我已经将它移到了一个CSV中)，并且我能够用有限的ggplot2经验创建几个漂亮的图形。我想要创建一个比例叠加条形图(所有的条形图之和为1)，而且我是成功的，但是我找不到一种方法将单个比例插入到每个条形图中。
下面是一个工作示例(在我的实际代码中，它有点不同，带有葡萄牙语的标签，但效果很好)：
require(stats)
library(ggplot2)
data <- esoph
g <- ggplot(data, aes(x = ncases, fill = tobgp)) +
浏览 4提问于2017-11-18得票数 0
1回答
我试着用ggplot2制作一个堆叠的条形图。但以下是最后输出的一些问题。守则是：
Year <- c(rep(2010 , 2) , rep(2011 , 2) , rep(2012 , 2) , rep(2011 , 2) , rep(2014 , 2) , rep(2015 , 2) ,
rep(2016 , 2) , rep(2017 , 2) , rep(2018 , 2) , rep(2019 , 2), rep(2020 , 2))
Station <- rep(c("A" , "B
浏览 5提问于2022-05-27得票数 1
geom_col I希望将相应的值标签放置在每个条形段中间的叠加条形图中。
然而，我天真的尝试失败了。
library(ggplot2) # Version: ggplot2 2.2
dta <- data.frame(group = c("A","A","A",
"B","B","B"),
sector = c("x","y","z",
浏览 4提问于2016-11-21得票数 32
回答已采纳
1回答
假设我们想要使用ggplot来生成一个条形图，显示跨另一个类别变量的某个类别变量的百分比。下面是R中的一个小数据帧和一些代码来获得一个漂亮的我想要的东西。
MYDATA <- data.frame(Region = c(1, 1, 2, 2, 3, 3, 4, 4, 5, 5),
Sex = c("M", "F", "M", "F", "M", "F", "M", "F", "M", "F&
浏览 2提问于2018-03-27得票数 1
回答已采纳
我想创建一个圆形条形图，显示电影的产量是如何随着时间的推移而增加的。我可以自己创建图形，但当尝试向条形图添加标签时，它会完全出错。任何洞察力-以及为什么图表会发生如此彻底的变化-都会非常感谢。蒂娅。
我想这与ylim值有关，但我不确定。
ratings <- read_csv("https://raw.githubusercontent.com/rfordatascience/tidytuesday/master/data/2019/2019-01-08/IMDb_Economist_tv_ratings.csv")
ratings$year_rel <-year(
浏览 0提问于2019-06-13得票数 0
1回答
我试图在/below条形图中的条形图(正值)上添加标签(对于负值)。但是，参数‘not’似乎不能正常工作。
我使用的代码类似于以下代码：
geom_text(aes_string(y=yCol,label=Labels), hjust=Data$BarLabJustX,vjust=Data$BarLabJustY,na.rm=T)
在我的data.frame ' data‘中，我将BarLabJustX=’中间‘，BarLabJustY='top’设置为bottom数据，BarLabJustY=‘底部’设置为负数据。它似乎工作在一些图表上，而不是在另一些图上。
以下是几个例子：
浏览 0提问于2019-07-23得票数 1
这是我的图： ggplot(iris,aes(Sepal.Length,Species, fill = Species)) + geom_col() +
theme(axis.text.y = element_text(hjust = 0)) 我想要的就是将y轴向右移动，并将它们向左对齐，以将它们包含在条形图中。 当我更改hjus =时，标签没有左对齐/对齐。 有什么帮助吗？
浏览 86提问于2021-06-18得票数 0
回答已采纳
3回答
我在windows上使用的是RStudio版本0.98.1028。我想用ggplot2制作多级直方图。假设我有一个这样的4D数据帧：
facet <- as.factor(rep(c('alpha', 'beta', 'gamma'), each = 4, times = 3))
group <- as.factor(rep(c('X', 'Y'), each = 2, times = 9))
type <- as.factor(rep(c('a', 'b'), e
浏览 0提问于2015-01-03得票数 2
如何在条形图中设置在ggplot2中具有正负值的向内条形标签？也就是说，条形标签应该面向0轴。
df <- data.frame(trt = c("a", "b", "c", "d"),
outcome = c(2.3, 1.9, 0.5, -0.5))
ggplot(df, aes(trt, outcome, label = outcome)) +
geom_bar(stat = "identity",
position = "ide
浏览 5提问于2016-09-30得票数 0
回答已采纳
在问题中，可以使用ggplot创建频率图。例如：
f <- factor(sample(letters[1:5], 100, r=T))
h <- table(f) / length(f)
dat <- data.frame(f = f)
ggplot(dat, aes(x=f, y=..count.. / sum(..count..), fill=f)) + geom_bar()
现在如何获取图中每个条形图的数据标签？
谢谢。
浏览 2提问于2016-09-13得票数 0
回答已采纳
# Create the data frame
library(tidyverse)
dat <- read.table(text = "A B C
1 23 234 324
2 34 534 120
3 56 324 124
4 34 234 124
5 123 534 654",
浏览 3提问于2019-01-23得票数 3
回答已采纳
我正在尝试在堆叠条形图中添加百分比标签。我可以在我的geom_bar中添加什么来显示堆叠条形图中的百分比标签？
这是我的数据：
myresults=data.frame(
manipulation=rep(c(-20,-10,0,10,20,-20,-10,0,10,20,-20,-10,0,10,20)),
variable=rep(c("a","a","a","a","a","f","f","f","f","f",&
浏览 6提问于2019-11-07得票数 2
我想将r因子变量的频率分布绘制为条形图，其中条形图表示因子水平的频率计数。我使用ggplot2来做这件事，这是没有问题的。
我不明白的是如何将频率计数标签添加到条形图中的条形。我尝试过的语法如下：
ggplot(data, aes(x = factorvar)) + geom_bar(fill = "somecolor") + geom_text(aes(y = ???))
我想我已经彻底搜索了stackoverflow和W.Chang的"R Graphics Cookbook“，但是我找不到上面geom_text()美学中的哪个参数应该与"y”匹配的具体答案。
浏览 2提问于2014-10-25得票数 27
回答已采纳
我正在尝试对R ggplot2中的条形图(每个条形图表示一个分类变量)进行重新排序注意:我不会尝试重新排列条形图中表示的变量的百分比。
这是我的条形图：
最重要的是，我希望在顶端注册。理想情况下，我希望以相反的顺序(然后驱逐，然后ISS，然后OSS >1天，然后OSS 1天)
下面是我的代码：
ggplot(discbyracelong,
aes(x=discipline,
y=pct, fill=Race))+
geom_bar(stat="identity")+
geom_text(aes(la
浏览 0提问于2018-10-27得票数 0
我正在尝试向ggplot2图(使用R)添加一个注释(标签)，其位置相对于另一个元素，即条形图中的条形图上的一个条形图。
我正在尝试将其作为包的一部分来完成，下面的示例有点做作，但我希望它说明了这一挑战。
下面是我首先尝试的方法，在其中，我将标签定位在y变量值加(因此标签在栏上方)，这是y变量值的5%。
library(ggplot2)
d <- data.frame(x = c("var1", "var2"), y = c(.2, 4))
ggplot(d, aes(x = x, y = y)) +
geom_col() +
annot
浏览 2提问于2017-10-28得票数 3
回答已采纳
1回答
我是R的初学者，我在这里遇到了两个问题。如果有人能帮我，我很感激。
，我做错了什么，我的代码没有在我的条形图中显示正确的发行版？(我试图根据性别和阶级来显示成活率)如何才能显示每个酒吧顶部每个标签的价值？
这是我的代码：
library(ggplot)
ds <- as.data.frame(Titanic)
color_survived = "#FFA500"
color_dead = "#0000FF"
ds$Sex <- as.factor(ds$Sex)
ds$Survived <- as.factor(ds$Survived)
浏览 1提问于2021-01-24得票数 1
回答已采纳
我已经找到并被引导到了无数的帖子中，展示了如何将统计数据放在ggplot中的所有条形图之上，但我还没有找到一个显示如何只显示条形图中一个条形图以上的计数/百分比的帖子。
例如，使用以下情节：
ggplot(mtcars, aes(x = gear)) + geom_bar() +
geom_text(stat='count',aes(label=..count..),vjust=-1)
我怎么能把"12“印在中间栏上，然后印上"5”和"15“。我想显示上面的计数的栏将因图而异(例如，在另一个图中，我想显示在第
浏览 2提问于2018-10-13得票数 3
回答已采纳
我正在尝试将堆叠条形图中的值包括在实际条形图中(最终我希望显示百分比，但现在我正在努力使数据框中已有的值显示出来)，以显示数字并使图形更易于阅读。当我添加"+ geom_text(aes(label = value))“时，数字会出现，但会导致所有数据(实际条形图)消失。我怎样才能在不让条消失的情况下添加这些值呢？有没有一种简单的方法可以放入其他要使用的值(比如百分比)并将它们放在中间？谢谢!
下面是我的代码：
library(ggplot2)
library(extrafont)
library(ggthemes)
Percentage <- c(rep("100%
浏览 16提问于2020-05-09得票数 0
我正在尝试使用ggplot2创建一个条形图，其中包含在条形图中所描述的值。我仍然想给这个组贴上"0“的标签，但颜色不同(黑色)，正好在x轴上方。我怎样才能改变这个geom_text的位置和颜色呢？
我已经尝试过在scale_colour_manual中输入一个向量，但是它没有工作(或者我做得不对)。
data <- read.table(text = "group percentage
group1 30
group2 29
group3 0
group
浏览 0提问于2019-01-08得票数 7
回答已采纳
我有一个如下的df：
fruit <- data.frame(Sample=1:100,
Fruit=c(rep("Apple", 10), rep("Strawberry", 25), rep("Grape", 20),
rep("Watermelon", 15), rep("Lime", 11), rep("Blueberry", 10),
rep("Plum", 9)),
Co
浏览 3提问于2018-01-31得票数 0
回答已采纳
1回答
我正在尝试从以下数据集创建条形图。
library(tidyverse)
library(janitor)
library(lubridate)
product <- read_csv(
"https://s3.us-west-2.amazonaws.com/public.gamelab.fun/dataset/Al-Bundy_raw-data.csv"
)
product <- product %>%
janitor::clean_names() %>% # this function cleans the names of the
浏览 1提问于2021-02-18得票数 0
我想显示每个条形图顶部附近的平均值，有点像来自的下面的图像。
我使用了那篇文章中的geom_text代码，但是图中将变量的值放在所有的条形图上，而不是每个条形图的顶部只有一个平均值。
ggplot(data=SocratesPreStudyApproved, aes(x=PlatformOrder, y=ReflectiveReflectionTest, fill=PlatformOrder))+
stat_summary(geom = "bar", fun = mean, position = "dodge", color="black
浏览 4提问于2021-03-06得票数 0
1回答
如何在叠加分组条形图中显示值标签
、、、、
我的问题是，如何在堆叠成组的条形图中显示数据(或值)标签。图表的形式是已经在这里解决的。
生成图表的代码可以在上述链接中的问题的第一个答案中找到。在链接中的问题中也给出了一个示例数据集。为了显示值标签，我尝试用
+ geom_text(aes(label=value), position=position_dodge(width=0.9), vjust=-0.25)
但这对我不起作用。我非常感谢在这方面的任何帮助。
浏览 3提问于2020-06-05得票数 0
回答已采纳
1回答
我有一个棒棒糖图表，我想改变条形降序，并添加数据标签。有人知道我会这么做吗？我的数据在这里
ggplot(states, aes(x=state, y=count)) +
geom_segment( aes(x=state, xend=state, y=0, yend=count), color="dodgerblue4") +
geom_point( color="dodgerblue4", size=4, alpha=0.6) +
theme_light() +
coord_flip() +
theme(
panel.grid.m
浏览 2提问于2020-12-03得票数 0
回答已采纳
我试图创建一个堆叠的条形图，其中重要的子类别由标签表示，但较小的子类别不会出现(因为这样会使图表混乱)。现在，我已经做了一个子集，仅显示该子类别的值超过20个的标签，但是即使我使用了position = position_stack(vjust = 0.5)，也有一些标签没有正确地居中。
编辑:例如，标签是正确居中的，请参阅“住房”栏，其中的房价不在其栈内--实际上位于两个堆栈之间的一条线上。另一个例子是“杂项”栏，其中保险是正确的，但“个人护理”应该更高，在更大的堆栈中。
如果有人有一个更好的方式显示这些标签，这也会受到赞赏，因为我对这张图表的外观并不满意，即使标签的中心正确，但我只是想不出
浏览 1提问于2021-06-08得票数 1
回答已采纳
我正在使用ggplot2绘制条形图。我想在条形图中在条形图上添加标签，但是值最高的条形图的标签名会被隐藏。我试图设置页边距，但标签值仍然不可见。
library(ggplot2)
x <- c(1:27)
y <- c(988,1195,804,574,414,309,234,196,169,125,95,73,57, 63 ,31,32 ,28 ,29 ,37 ,37 ,21 ,20 ,5,4,2,1,4)
z <- c(11233,7856,5926,4615,3714, 3037, 2548, 2156, 1842, 1610, 1436, 1302, 1177,106
浏览 6提问于2016-02-02得票数 0
回答已采纳
让我们用ggplot2从以下数据(已经采用长格式)绘制条形图。然后，通过geom_text()指令将变量的值放置在条形图的中间。
stuff.dat<-read.csv(text="continent,stuff,num
America,apples,13
America,bananas,13
Europe,apples,30
Europe,bananas,21
total,apples,43
total,bananas,34")
library(ggplot2)
ggplot(stuff.dat, aes(x=continent, y=num,fill=stuff))
浏览 2提问于2017-09-22得票数 0
回答已采纳
1回答
当我在R中创建下面的条形图时，没有问题，但当我将这些代码转换成闪亮的函数时，问题发生了，你能帮助我吗？ 普通R代码中的条形图： path <- "WA_Fn-UseC_-HR-Employee-Attrition.csv (job attrition)"
data <-fread(path)
# bar chart function function
Categorical_vs_categorical_plot_2 <- function(data,group_col,fill_col){
data %>%
ggplot(aes_(x =
浏览 19提问于2021-02-05得票数 0
回答已采纳
2回答
用ggplot更改标牌。
、、、、
我知道这方面已经有问题了，但我的情况不一样，我不知道该怎么做。
在我的tibble中，有一个列“value”，每个观察值都有一个值，"ind“将观测分成两组大小相等的组，"average_time”则包含了观察所属于的组的平均值。
这是我为获得图表而编写的代码：
my_data %>% ggplot(aes(values, x=ind, fill=ind)) +
geom_bar(stat="summary", fun=mean) +
theme_minimal() +
theme(legend.position="none")
浏览 5提问于2022-11-02得票数 0
回答已采纳
在我的圆形条形图中使用geom_text打印的文本是不可接受的，并且分辨率非常低。考虑到标签太长了，我想把它们折叠起来，让它变得简短。然而，我没有找到任何这样做的方法。我怎么才能做到呢？
library(tidyverse)
df2 <- data.frame (No=seq(1,6),
DrugID =
c('glyphosate','triclosan','alfacalcidol','tertracyline',
"3,3',5,5&#
浏览 4提问于2020-02-07得票数 1
1回答
我正在尝试将这个答案应用到我的数据集中，但是-作为一个初学者，它根本不适合我。
下面是一个示例集和示例代码：
d <- data.frame(Variant = sample(c("iedere","elke"),size = 50,replace = TRUE),
Region = sample(c("VL","NL"),size = 50,replace = TRUE),
PrecededByPrep = sample(c("1","0"),size = 5
浏览 3提问于2015-01-09得票数 1
回答已采纳
我正在ggplot2中制作一个分组条形图，并希望将图例中的标签放在最顶端的条形图中。
我的数据帧以逗号分隔的格式看上去像这样。
Group,Enrollment,Punished,PunishmentRate,Geography2
Total,2001957,302878,0.1512909618,State
Black,436329,117791,0.2699591363,State
Hispanic,625588,72974,0.1166486569,State
White,855256,96396,0.1127101125,State
Total,151818,14159,0.09326
浏览 0提问于2018-09-18得票数 1
回答已采纳
我试图将文本打印限制为条形图中的一个变量。我怎么才能给粉红条形601, 215, 399, 456贴上标签
ggplot(df, aes(Var1, value, label=value, fill=Var2)) +
geom_bar(stat="identity", position=position_dodge(width=0.9)) +
geom_text(position=position_dodge(width=0.9))
structure(list(Var1 = structure(c(1L, 2L, 3L, 4L, 1L, 2L, 3L,
浏览 4提问于2016-09-25得票数 3
回答已采纳
您可以在绘图区域内设置图例的位置，如
... + theme(legend.justification=c(1,0), legend.position=c(1,0))
是否有类似的简单方法来更改条形文本的位置(或分组图中的因子级别)？
library(reshape2); library(ggplot2)
sp <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + geom_point() +
facet_grid(. ~ sex)
sp
()
在格子中，我会使用类似于strip.text =level(dat$Y
浏览 1提问于2016-03-18得票数 12
回答已采纳
我正在ggplot2中使用geom_bar生成一些基本的条形图。我想把数字列在每个条形上相同的颜色上，我使用的是geom_text。我正在使用scale_fill_manual(values = alpha(c("#000000", "#FF5733")))填充酒吧。我遇到的问题是，条形上方的文本并没有改变为自定义的颜色。默认的R颜色保持不变。
library(ggplot2)
Area <- c("Option1", "Option2", "Option3")
Count <- c(193, 56,
浏览 10提问于2017-01-09得票数 26
回答已采纳
我正试图解决两个问题：
第一种方法是让条形图中的一些条形图超出图的顶部。
第二种方法是将条形图的值插入到图的底部，这样看图的人就可以知道条形图的上方有多远。
下面的代码是我解决这两个问题的尝试。它用coord_cartesian解决了第一个问题，也就是说，一个条形图是从图的顶部运行的。但它解决不了第二个问题。该条的值在栏的顶部，而不是在底部。我原以为“底部”或“0”会起作用，但我在很多地方都试过了，但都没有成功。
library(ggplot2)
library(data.table)
dt <- data.table(
scenario = c("2010
浏览 0提问于2018-04-02得票数 9
1回答
将比例添加到条形图中
、、、
我使用我的df创建了一个填充条形图(下面使用代码)。我想要在条形图中打印每个“种族”的比例。
Demo_17 <- tidyr::pivot_longer(Race_17, -c("State",), names_to = "Race", values_to = "num") %>%
ggplot(aes(x=State, y=num, fill = Race)) +
geom_bar(position="fill", stat="identity")
Demo_17 +
lab
浏览 4提问于2020-04-20得票数 1
回答已采纳
1回答
Bryer软件包有许多有用的功能，用于绘制Likert类型数据的分叉条形图。但是，缺少一个基本功能--在打印条形图时，似乎没有任何方法显示每个问题/组的总样本点数。如果要包含直方图图表，则这些n值将出现在直方图中。但我经常发现柱状图使整个情节太忙。
例如，使用比萨数据集，我可以为下面按国家分组的结果绘制一个不同的条形图。
data(pisaitems)
items28 <- pisaitems[, substr(names(pisaitems), 1, 5) == "ST24Q"]
# Create the likert object using country
浏览 1提问于2016-08-20得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
