我正在制作一个列/条形图,其中我用一个变量改变fill美学(条形图的内部颜色),用另一个变量改变colour美学(条形图周围的颜色)。酒吧周围的颜色不容易看到,所以我想增加那条的宽度。我怎么能这么做?我在scale_color_manual中没有看到任何scale_color_manual参数
library(ggplot2)
dat <- data.frame(x = 1:5, y = 1:5, p = 1:5, q = factor(1:5),
r = factor(1:5))
data <- data_frame(x = rep(
我有一个非常大的数据框,其中第一列中的每一行都表示一个带有数字的id。其他行有一个分类变量,该变量可以是两种类型(在本例中为A或B),每种类型持续一年。以下是一个简化的数据帧作为示例: id var2017 var2018 var2019
1 A B A
2 B A A
3 B A B
4 A A A
5 A B B 我想创建一个条形图,其中包含每年每种类型(A和B)的计数,条形图按类型分组。我是R
library(ggplot2)
mydat <- data.frame(type = c("A", "B", "C"),
height = c(0.9, 0.3, 0.4))
ggplot(mydat, aes(x = type, y = height, fill = type)) +
geom_bar() 运行上面的代码会出现以下错误: Error: stat_count() must not be used with a y aesthetic. 我想创建一个包含3条条形图的条形图:一条用
我准备了一个MWE,希望能得到关于如何在x轴上的不同位置为分组条形图设置刻度和标签的帮助。
library(ggplot2)
library(reshape2)
data <- data.frame(name = c("X","Y","Z"), A = c(2,4,6), B = c(1,3,4), C = c(3,4,5))
data <- melt(data, id = 1)
ggplot(data, aes(name,value)) +
geom_bar(aes(fill = variable), position =
我有一些虚拟数据,能够创建一个条形图和一个堆叠的条形图:
# some data
egdf <- data.frame(
ch = c('a', 'b', 'c'),
N = c(100, 110, 120),
M = c(10, 15, 20)
)
看起来是这样的:
egdf
ch N M
1 a 100 10
2 b 110 15
3 c 120 20
现在有一些图表:
# bar chart
ggplot(egdf, aes(x = ch, y = N)) +
geom_bar(stat = '
如何在R中将条形图从最高到最低排序?(ggplot2)
代码是这样的,但是可以随意做一个更好的代码哈哈Ps:这是一个巨大的数据。
ggplot(kiva, aes(repayment_interval, loan_amount, fill = repayment_interval)) +
geom_bar(stat = "identity") +
ggtitle("Total of loan for different types of repayment intervals")
给定一个字符串列表(特别是名称),是否有一种检测容易被人混淆的项目的算法,例如。在下面,3、4和5最有可能混淆,6和7不太容易,1和2不太可能,而8没有相等。如果寻找集是困难的,对将是可以接受的。
1. Joe Average
2. Joe Beverage
3. Michael Andersen
4. Michael Anderson
5. Micheal Anderson
6. Steve Cook
7. Steve Look
8. Xena: Warrior Princess
更复杂的是,必须考虑字符的位置,因为人比中间的人更容易发现单词/字符串开头的字符差异。
1. Pink Floy
这与前面的问题类似,但我还没有找到一个可行的解决方案。 我在ggplot中有一个堆叠的条形图,几乎与here中列出的条形图完全一样。像那个用户一样,我只想要那些计数> 20的条形图的类别标签。我试着做了那里建议的子集解决方案以及一个ifelse语句。对于我得到的子集解决方案: Error in n > 20 : comparison (6) is possible only for atomic and list types 我的图表: data %>%
count(groups, Response) %>%
mutate(group
我正在处理一个具有“不干净”字符串列的数据集。这些是公司名称,其中大多数是手动输入的,因此有不同的格式和表示形式。dataset列如下所示:
company_name
big compnay
big company
big company inc.
smll compny
small company
small inc.
我试图编辑上面的列如下所示:
company_name
big company
big company
big company
small company
small company
small company
数据点的数量比手动清理的要大得多。我非常感谢你的任何建议/帮助/
我已经运行过这段代码。给出显示的结果。现在,我想为每个堆叠条形图的每个单独类别添加计数数字。
dat$SU<-as.factor(dat$SU)
#INVENTORY PER SU
ggplot(dat, aes(x=SU,fill=factor(SCIENTIFIC_NAME)))+
geom_bar(width=0.5)+xlab("Sampling Unit (SU)")+
ylab("Count")+labs(fill="SCIENTIFIC NAME")+
ggtitle("Inventory per sam
我有这样的数据: SupplyChain Value
A 1000
B 2000
C 3000 我想制作一个以x轴为"SupplyChain“,y轴为值的条形图,然而,在图表中,每个条形图的百分比范围是total。例如,在条形图A的图表中,该值为16.67%,条形图顶部的值为"1000“。 另外,我有一组颜色,我也想分配给每个供给链,我已经尝试在ggplot中使用"scale_colour_manual“,但我没有运气。下面是我想要的示例: ?