如何在ggplot条形图中显示错误条形图？
在ggplot中显示错误条形图可以通过使用geom_errorbar()函数来实现。该函数可以在条形图上添加误差线，以显示数据的不确定性。
下面是一个完整的示例代码：
library(ggplot2)
# 创建示例数据
data <- data.frame(
group = c("A", "B", "C"),
value = c(10, 15, 12),
error = c(1, 2, 0.5)
)
# 绘制条形图
p <- ggplot(data, aes(x = group, y = value)) +
geom_bar(stat = "identity", fill = "blue") +
labs(x = "Group", y = "Value")
# 添加错误条形图
p <- p + geom_errorbar(aes(ymin = value - error, ymax = value + error), width = 0.2)
# 显示图形
print(p)在上述代码中，首先加载ggplot2库，并创建一个包含组别、数值和误差的示例数据框。然后使用ggplot()函数创建一个基础的条形图，并使用geom_bar()函数添加条形。接下来，使用geom_errorbar()函数添加误差条形，其中ymin和ymax参数分别指定了误差线的下限和上限。最后，使用print()函数显示图形。
这样，就可以在ggplot条形图中显示错误条形图了。
请注意，以上示例中没有提及任何特定的云计算品牌商，如需了解腾讯云相关产品和产品介绍，建议访问腾讯云官方网站获取更详细的信息。
相关·内容
所以我的传说就是这个村庄(奇罗佐，上帝，鲁卡)。如何移除图例并在条形图中显示；例如，在条形图中，我要写在里面？
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
我正在尝试用散点图绘制条形图，但未能成功显示。 我一直收到错误代码- Error:不知道如何将o添加到图中 plot(ggplot(midwest, aes(state, poptotal))+
geom_bar(stat="identity", fill="tomato2")+
xlab("State")+ylab("Total Population"))+
par(new=TRUE)+
plot(ggplot(data = midwest) +
geom_point(mapping = aes(x = popwhi
浏览 15提问于2019-02-10得票数 0
1回答
我最近尝试将错误条形图添加到我在R中的ggplot中创建的条形图中。然而，当我查找geom_errorbar时，唯一有文档记录的方法似乎是创建另一个包含每个条形图的ymin和ymax的数据框，并使用stat='identity‘属性绘制条形图，这似乎非常麻烦。 例如，这是出现在geom_errorbar帮助页面中的示例： df <- data.frame(
trt = factor(c(1, 1, 2, 2)),
resp = c(1, 5, 3, 4),
group = factor(c(1, 2, 1, 2)),
se = c(0.1, 0.3, 0.3,
浏览 3提问于2019-04-29得票数 0
4回答
我试着在酒吧里显示频率..。好的，我想让他们在图中的某个地方：在条形图下面，在条形图中，在条形图的上方，或者在图例区。我记得(我可能是错的)它可以在ggplot2中完成。这可能很简单..。至少看起来很容易。下面是代码：
p <- ggplot(mtcars)
p + aes(factor(cyl)) + geom_bar()
我是否有可能得到嵌入在图表中的频率？
浏览 4提问于2010-03-31得票数 21
回答已采纳
我想在R中创建一个条形图，示例数据如下所示：
Name <- c('Sample1', 'Sample2', 'Sample3')
Total <- c(86020045,30974095,1520609)
Part <- c(41348957, 2956650, 595121)
DT <- data.frame(Name,Total,Part)
DT
ggplot(DT, aes(Name, Total, fill=Name)) +
geom_bar(position="stack",s
浏览 3提问于2016-10-13得票数 0
回答已采纳
我希望有条形图，其中的条形具有相同的宽度在不同的地块，无论有多少条显示。我不想在同一页上显示绘图，也不想用facet、grid.arrange或任何类似的东西来排列它们，而是只有两个具有相同宽度的条形图。
我可以通过将宽度乘以图表中条形图中的条形图数量除以具有最多条形图的条形图中的条形图数量(参见示例)来实现此目的。但是，如果我可以在调用ggplot之前不进行任何计算就能做到这一点，那将会更方便，代码也会更整洁。
有没有办法用线，em，厘米这样的单位来指定条的宽度？
或者，我可以在geom_col调用中访问映射到x-美学的变量的层数吗？(请注意映射到绘图之间的x美学变化的变量)
或者还有另一种
浏览 13提问于2021-02-22得票数 0
回答已采纳
我试图将错误条形图添加到我的条形图中，但我不能。当我写代码时：
ggplot(data = GenIncom, aes(x = educ, y = appxincome, fill =sex)) +
stat_summary(fun.y = "mean", position = "dodge", geom = "bar" )
我得到了：
但是，当我编写代码来添加错误条形图时，图形会消失，出现空白，或者我可能会得到没有实际条形图的错误条形图。下面是我的错误条代码：
ggplot(data = naedu, aes(x = ed
浏览 1提问于2017-04-14得票数 0
我是一个绝对的初学者，最近我开始使用优秀的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
回答已采纳
2回答
mydates<-data.frame(effectiveDate=as.Date(c("2012-1-1","2012-1-1","2012-2-1","2012-10-1","2012-4-1","2012-8-1","2013-1-1")))
如何使用ggplot绘制条形图，条形图中的条形图是年-月？在本例中，将有13个条形图：“2012年1月”到“2013年1月”，每个条形图的高度将表示该月内每个日期的计数。
浏览 5提问于2013-07-10得票数 0
回答已采纳
1回答
我正试图在我的条形图中添加一行，显示年份的%差异。我试图创建一个函数：
year_pct_change <- function(x) {
x <- x[order(x$Year, decreasing = TRUE), ] # Confirms ordered by decreasing year
pct_change <- -diff(x$Value)/x$Value[-1] * 100 # Gets percent change in profit from preceding year
data.frame(year = x$YEAR[-length(x$Y
浏览 7提问于2022-10-22得票数 0
回答已采纳
我已经找到并被引导到了无数的帖子中，展示了如何将统计数据放在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
回答已采纳
我有一个堆叠的条形图，受页面上的的启发，我想突出显示条形图中的一个条形图。例如，我希望中间条的所有三种颜色都是深色的，而第一条和第三条的所有颜色都要稍微亮一点。我假设scale_fill_OkabeIto的darken参数在某种程度上可能会派上用场。
library(ggplot)
library(colorblindr)
ID <- rep(1:3, each = 3)
group <- rep(letters[1:3], times = 3)
prop <- c(0.8, 0.1, 0.1, 0.6, 0.3, 0.1, 0.4, 0.3, 0.3)
t
浏览 8提问于2018-04-23得票数 3
1回答
下面的条形图没有显示条形图中的颜色。 ggplot(top5_energyProducersMod, aes(year, ggwt_hours), fill = year) +
geom_bar(stat = "identity", position = "dodge") +
facet_wrap(~country_name) ? 我使用的是R studio桌面版
浏览 15提问于2020-10-05得票数 1
回答已采纳
我试图在酶的活性上画出性别之间的比较。我已经有了平均值和SD来创建一个条形图。条形图绘制正确，但错误条出现在错误的位置。
下面是我使用的代码：
ggplot(data=descriptives_plot, aes(x=sex.1, y=mean) ) +
geom_bar(stat = "identity") +
geom_errorbar(aes(ymin=mean, ymax=sd),
position = position_dodge(20))
但是输出显示如下：
正如您所看到的，错误条出现在条形图中，而不是在条形图的顶部。此
浏览 2提问于2020-05-21得票数 0
回答已采纳
我尝试使用ggplot2在比例条形图中显示数据点的绝对值。
代码如下：
<code>A0</code>
这是代码创建的tibble：
<code>A1</code>
我使用以下代码生成比例条形图：
<code>A2</code>
<code>B3</code>
有没有办法在条形图中添加标签，以显示<code>D4</code>有3个齿轮3的模型和4个齿轮4的模型，而<code>D5</code>有1个齿轮3的模型和1个齿轮4的模型？
谢谢!
浏览 15提问于2020-08-04得票数 0
回答已采纳
1回答
我有一个包含子组的数据集，我想在条形图中显示2条数据(一条使用条形图的高度，另一条使用条形图的宽度)。
我称它为一个条形图，具有不同的条形宽度。
到目前为止，这就是我所拥有的：
library(ggplot2)
df <- data.frame(Year = c('2010',rep('2011', 2), rep('2012', 3), rep('2013', 4)),
Subyear = c('2010','2010','2011',&#
浏览 0提问于2018-09-05得票数 3
回答已采纳
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
回答已采纳
6回答
我在ggplot2中制作了一个闪开的条形图，其中一个分组的计数为零，我想要显示它。我记得不久前我在上看到了这个，我想scale_x_discrete(drop=F)应该可以工作。它似乎不适用于闪开的条形图。我怎样才能显示零计数呢？
例如，(下面的代码)在下面的图中，type8~group4没有示例。我仍然希望绘图显示零计数的空白空间，而不是消除条形图。我该怎么做呢？
mtcars2 <- data.frame(type=factor(mtcars$cyl),
group=factor(mtcars$gear))
m2 <- ggplot(mtcars2, ae
浏览 3提问于2012-04-26得票数 45
回答已采纳
我有一个数据集，用来测量被调查者的情绪，因为他们被显示出不同的刺激。下面是一个示例：
Sample Attribute Score Rank
A Delighted 180 High
A Happy 200 High
A Tired 130 Medium
B Delighted 160 Medium
B Happy 128 Low
B Tired 115 Low
我对R相当陌生，而且我在制作一个只
浏览 6提问于2021-06-30得票数 2
回答已采纳
1回答
我有两列-一列有一个数字(节)，另一列说明它在r中是good还是bad。下面是一个示例数据
df <- data.frame(G_or_B = c("Good", "Good", "Bad", "Good", "Good", "Bad", "Good", "Good"), Section = c(1,1,1,1, 2,2, 3,3) )
我需要一个柱状图(条形图)，它显示每个部分，它在r中有多少goods和多少bads，并且还显示了条形图中的商品和劣质的数量。我
浏览 7提问于2019-11-01得票数 1
1回答
如何通过在shiny中单击从条形图中获取类别(x轴信息)。请看下面的应用程序。我希望当用户单击绘图中的某个条形图时，output$cut会显示cut类型。 library(shiny)
library(ggplot2)
library(dplyr)
ui <- fluidPage(
plotOutput('diamonds', click = "click"),
textOutput('cut')
)
server <- function(input, output, session) {
output$diamon
浏览 13提问于2021-10-10得票数 1
回答已采纳
假设我有一个带有蓝色网格线的条形图，如下所示。我想要的是蓝线不会切入条形图，而是仅在整个宽度结束后开始。这个是可能的吗？
ggplot(mpg, aes(class)) + geom_bar(aes(weight = displ)) +
theme(panel.grid.major.x = element_line(colour="blue", size=0.5))
图中的箭头显示了我希望网格线对齐的位置，而不是切入条形图的位置。
浏览 22提问于2020-05-09得票数 0
我在绘制条形图时遇到了这个错误，我无法摆脱它，我已经尝试了qplot和ggplot，但仍然是同一个错误。
以下是我的代码：
library(dplyr)
library(ggplot2)
#Investigate data further to build a machine learning model
data_country = data %>%
group_by(country) %>%
summarise(conversion_rate = mean(converted))
#Ist method
qplot(
浏览 65提问于2016-09-25得票数 94
回答已采纳
我用ggplot2制作了一个简单的柱状图，比较了两种昆虫的雌雄平均寿命(年龄)。我的代码看起来像这样，“数据集”就是我的数据集……
gplot(dataset, aes(Species, Age, fill=Sex))+
stat_summary(fun.y = mean, geom = "bar", position = "dodge")+
scale_fill_manual(values = c("Grey25", "Grey"))+
theme(legend.title = element_blank())+
sca
浏览 3提问于2017-07-03得票数 8
回答已采纳
1回答
我正在创建一个堆叠的条形图，显示多年来样本的政党偏好的变化。虽然这一部分已经完成，但我想在条形图上绘制一个线形图，查看与前一年相比发生变化的样本的百分比。 我目前已经绘制了两个独立的堆叠条形图，但我认为它们融合在一个条形图中会更好。 我的数据如下所示： ID Year Party Change
1 2010 Labour NA
1 2011 Labour No Change
1 2012 Con Change
1 2013 Con No Change
2 2010 Con No Change
2 2
浏览 16提问于2019-04-09得票数 0
回答已采纳
在条形图中，值显示为incorrectly.How以更正错误。
ggplot(data=df, aes(x=Demand_Supply,fill=time_slot),position = 'stack') +
geom_bar() + facet_wrap(~`Pickup.point`) +
geom_text(stat='count',aes(label=abs(..count..)))
浏览 0提问于2017-10-08得票数 0
1回答
我使用的是ggplot2，我需要在同一直方图上显示两组数据，并需要区分它们。目前，我只是将每个系列的颜色设置为50%不透明度，这样我就可以看到隐藏在彼此后面的条形图，但这远远不是理想的，看起来真的很难看，而且读起来相当混乱。
有没有一种方法可以让R智能地覆盖条形图，这样我就可以使用完全不透明的条形图，而不会有隐藏在视图中的条形图？下面是我目前的代码：
library(ggplot2)
dat <- data.frame(a=sample(10, size=100, replace=T),
b=sample(10, size=100, replace=T
浏览 2提问于2013-04-15得票数 2
回答已采纳
1回答
我想在一个变量的ggplot2条形图中根据另一个变量的聚合状态设置条形图的填充颜色。
例如，使用来自的房价回归数据，我可能希望使用颜色在条形图中可视化每类房屋的平均销售价格。
ggplot(
data = df,
mapping = aes(x = OverallCond, fill = mean(SalePrice))
) +
geom_bar()
这不是我要找的图表。每条线都应该是一种颜色，代表该类别的平均销售价格。
浏览 18提问于2021-06-12得票数 0
我正在使用ggplot2制作一个分组条形图。然而，我在添加sd/sem时遇到了问题。标准错误是：'1,2,3,1‘。如何将错误条形图添加到此条形图？ survey <- data.frame(group=rep(c("LG", "RM"),each=2),
sample=rep(c("sample1", "sample2"),1),
values=c(200,50,300,25 ))
library(ggplot2)
ggplot(survey,
浏览 15提问于2019-12-26得票数 0
回答已采纳
我想对用geom_bar创建的ggplot的图例和图中的组进行排序。
下面是一个例子
mydata <- data.frame(mygroup = c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),
mysubgroup = c("north", "west", "south", "east", "north
浏览 0提问于2013-05-14得票数 4
回答已采纳
1回答
我尝试将值隐藏在条形图的条形图中。这样做的原因是我将值放在了条形图的顶部，并且该值不应该显示两次。 我尝试了不同的选项来隐藏该值，但它不起作用。 在下面的屏幕截图中，你可以看到，我想要删除条形图中的数字。 Image of the bars
浏览 12提问于2020-09-16得票数 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
回答已采纳
14回答
我正在尝试制作一个条形图，其中最大的条形图离y轴最近，最短的条形图最远。所以这有点像我的桌子
Name Position
1 James Goalkeeper
2 Frank Goalkeeper
3 Jean Defense
4 Steve Defense
5 John Defense
6 Tim Striker
因此，我正在尝试构建一个条形图，根据位置显示玩家的数量
p <- ggplot(theTable, aes(x = Position)) + geom_bar(binwidth = 1)
但图中显示的是守门员杆，然后是防
浏览 13提问于2011-03-06得票数 336
回答已采纳
在条形图中，条形图中存在的问题是，条形图的间距和/或条形图的宽度是不一致的，也会随着图的宽度的变化而变化。
set.seed(23511)
dat <- data.frame(x = 1:540, y = rnorm(540))
library(ggplot2)
ggplot(dat) +
geom_bar(aes(x = x, y = y), stat = "identity")
有办法解决这个问题吗？我试着玩width和整个情节大小都没有用。
作为对alistaire评论的回应，下面是RStudio前几个酒吧的截图。看前10个值。
x
浏览 1提问于2016-05-31得票数 4
回答已采纳
我试图在ggplot中的条形图中并排显示频率和累积频率，但我最终得到的是重叠的条形图。
下面是一个可重复的例子：
data(mtcars)
setDT(mtcars)
data <- mtcars[, .(Total = .N), by = carb][order(carb)][, .(carb, freq = Total/sum(Total))][
, .(carb, freq, cumfreq = cumsum(freq))]
ggplot(data, aes(x = carb)) +
geom_bar(fill = "red", alpha = 0.5,
浏览 1提问于2017-07-06得票数 0
回答已采纳
我想创建一个ggplot条形图，使用我自己的照片来填充条形图。我尝试过使用ggpattern来做这件事，但是我遇到了麻烦。将选择的.jpeg照片加载到R中的最佳方式是什么，以及如何将它们合并到条形图中？
浏览 60提问于2021-02-12得票数 0
2回答
如果我想要将ggplot2条形图中的条形图从最大到最小排序，那么我通常会更新条形图类别的因子级别，如下所示
one_group <- data.frame(
height = runif(5),
category = gl(5, 1)
)
o <- order(one_group$height, decreasing = TRUE)
one_group$category <- factor(one_group$category, levels = one_group$category[o])
p_one_group <- ggplot(one_group
浏览 1提问于2011-03-24得票数 8
回答已采纳
在使用stack='identity'绘制堆叠条形图时，我注意到在每个条形图中，堆叠的顺序是不同的，似乎是随机的。这是使用stat='bin'绘制的图，也就是说，ggplot在绘图之前动态计算每个类别中的元素数(data.table在后面进行)：
library(ggplot2)
library(data.table)
diamonds <- data.table(diamonds)
ggplot(diamonds, aes(clarity, fill = cut)) + geom_bar(position="fill")
在
浏览 2提问于2015-11-04得票数 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
1回答
我在R闪亮的地方有个酒吧。我要以下几点：
当用户单击该条形图中的一个"bar“时，另一个框将弹出并显示来自已使用数据框架的数据信息，显示哪些数据点有助于创建该"bar”。
代码：
ui <- fluidPage(
sidebarLayout(sidebarPanel(),
mainPanel(plotOutput("p",click = "plot_click"),
textOutput("info"))))
server <- function(i
浏览 1提问于2018-02-02得票数 0
1回答
我有以下数据集：
Year, Height, Width, Weight
1990, 5, 45, 190
2000, 7, 77, 210
2010, 2, 20, 150
我想要绘制一列条形图，并绘制、width和 with 的图表。在每个条形图中，每年都要绘制这些数值。因此，假设我的柱状图中的最上面的柱状图是，它将在x轴上显示1990年、2000年和2010年的值5、7和2。
我想出了如何有一列条形图，每个条形图代表一年：
data <- read.csv("../data/MyData.csv")
data.m <- melt(data, id.vars =
浏览 3提问于2016-03-25得票数 3
回答已采纳
我想在ggplot2中生成一个堆叠条形图，其中堆栈中的条形图是根据该类别的计数排序的。当我使用下面的代码尝试这样做时，似乎ggplot2按照字母顺序排列了堆叠图中的条形图的顺序。Stackoverflow上的其他答案表明，ggplot2根据R消耗数据的顺序对条形图进行排序，但是在“a”数据栏中，设备列的顺序是“收音机”、“笔记本电脑”、“电视”“冰箱”(前4行)--这也不是图表中显示的顺序。
library(ggplot2)
library(tidyr)
#some data
SalesData<-data.frame(Appliance=c("Radio",
浏览 5提问于2018-10-22得票数 1
回答已采纳
我有一个问题，格式化ggplot2显示一个堆叠的条形图，其中包含Y轴上的累加百分比，并在条形图中计数。我可以做每种类型的一幅图(Y轴上有百分比的图，在条形图中有计数)，但不能两者都做。我现在拥有的是：
group <- c(1,1,1,2,2,2)
ind <- c(1,2,3,1,2,3)
count <- c(98,55,10,147,31,3)
df <- data.frame(group, ind, count)
library(ggplot2)
library(scales)
ggplot(df, aes(y=count, x=factor(group),
浏览 2提问于2018-07-06得票数 2
回答已采纳
在我的条形图中，我反转了y轴，因此较低的值位于顶部，但我希望条形图从x轴向上延伸。
有没有办法改变条形图的延伸方向？
library(tidyverse)
mtcars %>%
group_by(cyl) %>%
summarise(mean_mpg = mean(mpg)) %>%
ggplot(aes(x = as.factor(cyl), y = mean_mpg)) +
geom_col() +
scale_y_reverse() +
coord_cartesian(ylim = c(0, 35))
上面的代码创建了条形图，条形图从
浏览 6提问于2017-06-23得票数 1
1回答
我试图在R中创建一个堆叠的条形图，我需要条形图来显示三件事：
Y轴=计数
X轴杆=通过驾驶考试(是或否)
X轴杆内的颜色拥有一辆汽车(是或否)
所以我想要的输出是：
然而，我的实际产出是：
到目前为止我的代码是：
carData <- read.csv(file="~/Desktop/carData.csv",head=TRUE,sep=";")
ggplot(carData, aes(x = passed.test, fill = owns.car)) + geom_bar()
CSV文件中的passed.tes
浏览 5提问于2018-04-28得票数 0
我想在分组条形图中订购条形图。
这是我的tibble
# A tibble: 13 x 3
number name prop
<dbl> <chr> <int>
1 Dog 0.0664
1 Cow 0.0628
1 Pig
浏览 6提问于2020-05-15得票数 0
回答已采纳
我有一个数据帧'x‘
我想要这样的酒保
我试过了
barplot(x$Value, names.arg = x$'Categorical variable')
ggplot(as.data.frame(x$Value), aes(x$'Categorical variable')
似乎没有什么东西能正常工作。在条形图中，所有的轴标签(freq值)都是不同的。ggplot正在将所有条形图填充到100%。
浏览 3提问于2018-02-02得票数 0
回答已采纳
我已经用ggplot2包中的ggplot() + geom_bar()函数创建了一个条形图。我还使用了coord_flip()来反转条形图的方向，使用geom_text()来在每个条形图的顶部添加值。有些条形图有不同的颜色，因此在图表后面有一个图例。我得到的结果是一张图片，一半被图表占据，一半被图例占据，由于图表太小，最长的条形图顶部的值被切断。 关于如何放大图表和缩小图例的大小，以便条形图的值不被截断，有什么想法吗？ 谢谢 这是我在虚构数据上的代码： labels <- c("A","B","C","D","E&
浏览 17提问于2020-06-20得票数 2
回答已采纳
2回答
我正在创建两个条形图，第一个高度是3个值的总和，我想用不同的颜色来显示。我可以创建该图，如下所示：
library(reshape)
library(ggplot2)
data1 <- data.frame("Year" = c(2011, 2012, 2013, 2014, 2015, 2016),
"Item1" = c(47.3, 46.3, 49.9, 50.1, 50.9, 47.2),
"Item2" = c(26.9, 58.9
浏览 17提问于2017-02-18得票数 1
回答已采纳
让我们用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
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
