我是 R 新手,正在尝试创建分组条形图,但遇到一些问题。我编写了一些代码,但图表看起来并不像我想要的那样。
dveR <- data.frame(values = c(3.921, 3.557, 3.793, 3.154, 2.387, 1.906),group = rep(c("Cardia","Anterior","Posterior"),each = 2),subgroup = LETTERS[1:2])
ggplot(dveR,aes(x = group,y = values, fill = subgroup)) + geom_bar(stat = "identity",position = "dodge") + scale_fill_manual(values=c("springgreen4","orange2")
Run Code Online (Sandbox Code Playgroud)
我希望轴标签为 Y=Log Re 和 X=组织,我希望条形的顺序为贲门、前、后,但似乎按字母顺序对它们进行排序。子组标签也应该是 0 小时和 24,但我不知道如何更改它。任何帮助将不胜感激,谢谢!
我有3列的数据框(df),例如
NUMERIC1: NUMERIC2: GROUP(CHARACTER):
100 1 A
200 2 B
300 3 C
400 4 A
Run Code Online (Sandbox Code Playgroud)
我想按GROUP(CHARACTER)对NUMERIC1进行分组,然后计算每组的均值.像这样的东西:
mean(NUMERIC1): GROUP(CHARACTER):
250 A
200 B
300 C
Run Code Online (Sandbox Code Playgroud)
最后,我想使用ggplot2绘制条形图,在x轴上具有GROUP(CHARACTER),在y轴上具有a = nd mean(NUMERIC).它应该看起来像:
我用了
mean <- tapply(df$NUMERIC1, df$GROUP(CHARACTER), FUN=mean)
Run Code Online (Sandbox Code Playgroud)
但我不确定它是否可以,即使它是,我也不知道接下来应该做什么.
我试图使我的堆积式列amChart始终在列上显示值标签。即使它们不合适。
我正在使用此代码:
var qtrchart = AmCharts.makeChart("chartdiv", {
"type": "serial",
"theme": "none",
"legend": {
"autoMargins": false,
"borderAlpha": 0.2,
"equalWidths": false,
"horizontalGap": 10,
"markerSize": 10,
"useGraphSettings": true,
"valueAlign": "left",
"valueWidth": 0
},
"dataProvider": [{
"QTR":"FY14 Q2",
"DSAT":0.032602706911007306,
"Neutral":0.069205892921307938,
"CSAT":0.89819140016768484},
{"QTR":"FY14 Q3",
"DSAT":0.038609212354234618,
"Neutral":0.060273567620017982,
"CSAT":0.90111722002574746},
{"QTR":"FY14 Q4","DSAT":0.038757557172180282,
"Neutral":0.058425780441887579,
"CSAT":0.90281666238593217},
{"QTR":"FY15 Q1",
"DSAT":0.12391774891774893,
"Neutral":0.10355411255411255,
"CSAT":0.77252813852813851}],
"valueAxes": [{
"stackType": "100%",
"axisAlpha": 0,
"gridAlpha": 0,
"labelsEnabled": false,
"position": "left"
}],
"graphs": [{
"balloonText": "[[title]], [[category]]<br><span style='font-size:14px;'>[[percents]]%</span>",
"fillColors": "#87898b",
"lineColor": "#87898b",
"color": "#ffffff",
"fillAlphas": 0.9,
"fontSize": 11, …Run Code Online (Sandbox Code Playgroud) 我有一个这样的列表:
gender = ['male','female','male','female']
Run Code Online (Sandbox Code Playgroud)
使用matplotlib将这个列表的计数绘制成条形图的最简单方法是什么?
这是我在R中的数据框,
New York 8755
Texas 7654
California 6726
Florida 6322
Run Code Online (Sandbox Code Playgroud)
我只希望图形比较并排堆积的条形中的数字,但我还无法实现。我收到错误消息“高度必须是矩阵的向量”。请提出建议!非常感谢!
需要帮助对齐条形图上的标签.
这是可重现的代码:
library(ggmap)
library(ggplot2)
library(gganimate)
library(readxl)
library(animation)
mydf1<-structure(list(year = c(1994, 1995, 1997, 1997, 1998, 1998, 2000,
2000, 2001, 2001, 2002, 2002, 2004, 2005, 2005, 2006, 2006, 2007,
2007, 2008, 2008, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2015,
2016, 2016, 2016, 2016), N = c(3L, 1L, 1L, 4L, 1L, 4L, 1L, 2L,
1L, 5L, 1L, 2L, 1L, 1L, 4L, 1L, 3L, 1L, 2L, 1L, 5L, 2L, 2L, 6L,
4L, 1L, 1L, 2L, 1L, 1L, 3L, 4L, 1L), channels = c(86, …Run Code Online (Sandbox Code Playgroud) 我正在根据以下格式的数据生成条形图:
count | month
------|-----------
1000 | 2012-01-01
10000 | 2012-02-01
Run Code Online (Sandbox Code Playgroud)
我正在尝试为条形图分配连续的颜色。我希望将颜色渐变用作条形的填充颜色。
我正在尝试:
ggplot(userData, aes(month, count)) +
geom_bar(stat = "identity") +
scale_x_date() +
# scale_fill_gradient(low="blue", high="red") +
scale_fill_continuous(low="blue", high="red", limits=c(0,6500000)) +
labs(x= "Time", y="Count")
Run Code Online (Sandbox Code Playgroud)
但是,我没有得到理想的结果,图表中的条形仍然保持灰色,如下所示:
我已经尝试了scale_fill_continuous和和scale_fill_gradient,但是都没有成功。
我不确定我在这里到底缺少什么。
我想用Swift 3设置条形图并遵循本教程.
我barChartView在my viewController和数据值中创建了一个viewDidLoad:
var months: [String]!
var counts: [Double]!
months = ["Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"]
counts = [20.0, 4.0, 6.0, 3.0, 12.0, 16.0, 4.0, 18.0, 2.0, 4.0, 5.0, 4.0]
Run Code Online (Sandbox Code Playgroud)
然后我setChart用值来调用函数:
setChart(dataPoints: months, values: counts)
Run Code Online (Sandbox Code Playgroud)
该函数本身如下:
func setChart(dataPoints: [String], values: [Double]) {
var dataEntries: [BarChartDataEntry] = []
for i in 0..<dataPoints.count {
let dataEntry = BarChartDataEntry(value: values[i], xIndex: i)
dataEntries.append(dataEntry)
}
let chartDataSet …Run Code Online (Sandbox Code Playgroud) 我试图在ggplot中绘制条形图,但我不断只获得网格.这显然是关于draw nothing 这里的演示,但我想了解如何以最简单的方式显示值.
library(ggplot2)
testData<-data.frame(x=c("a","b","c","d","e","f"), y=c(10,6,9,28,10,17))
bar <- ggplot(data=testData, aes(x=c("a","b","c","d","e","f"), y=c(10,6,9,28,10,17), fill = "#FFCC00"))
Run Code Online (Sandbox Code Playgroud)
我可以获得这些情节的一种方法是 geom_bar
bar <- ggplot(data=testData, aes(x=c("a","b","c","d","e","f"), y=c(10,6,9,28,10,17), fill = "#FFCC00")) + geom_bar(stat="identity")
Run Code Online (Sandbox Code Playgroud)
为什么没有在第一个条形图上绘制值以及如何以最简单的方式修复它?这种绘图方式背后的想法+是什么?它叫做什么?
假设我在数据框列中有一系列考试成绩:
grades <- c("B", "C", "C", "C", "D", "D", "E", "F", "F")
grades.df <- data.frame(grades)
Run Code Online (Sandbox Code Playgroud)
在说明这一点时,插图会有点误导,因为它没有显示每个人都期望在那里的等级为0:"A":
barplot(table(grades))
如何将0次出现的"A"添加到此表中,以使其显示在零高度的条形图中?