数据是我转录分析的到的基因表达量
导入数据如图所式:

此表格为某个基因在两个样本即CM和HP三个生物重复的表达Mean和SE(SE为标准误差,可用来评估准确性或精确性,用来估计抽样误差),此表格在excel中保存为csv格式
将数据导入R,用ggplot进行绘图
代码如下:
##导入数据
data<-read.csv("D:/桌面/bidui/geneex.csv",stringsAsFactors=FALSE)
##代码画图
ggplot(data,aes(x=sample,y=mean,fill=group))+
geom_bar(stat='identity',position=position_dodge(0.3),width=0.3)+
geom_errorbar(aes(ymin = mean - se, ymax = mean + se),width = 0.1, size = 0.8, position = position_dodge(0.3),color='black',linetype=1) +
scale_fill_manual(name='',values = c('#eb4d4b', '#16a085')) +
theme(panel.grid = element_blank(), panel.background = element_blank(), axis.line = element_line(colour = 'black'), legend.position = c(0.9, 0.85)) +
scale_y_continuous(expand = c(0, 0), limit = c(0, 25))+
xlab('')+
ylab('Relative expression level')+
labs(title="LOC107420087")+
theme(plot.title = element_text(hjust = 0.5,size=16,face="bold"))+
theme(legend.text=element_text(size=14,color = "black"))+
theme(axis.line=element_line(colour = "black",size=0.8),axis.text = element_text(size=14,colour="black"))+
theme(axis.title.y = element_text(size=14,color = "black"))+
theme(axis.ticks = element_line(color = "black",size=0.8))

写在最后,此代码还不够精简,打算画这种基因表达图的小伙伴们可以试着去完善代码画出自己满意的图,有些代码单独看不知道是设置什么的,可以自己尝试运行改一下就了解了。
我有一个Highstock图表(带有标记和阴影的线条),并且想以编程方式显示一个highstock工具提示,例如,当我选择某个表上的一行(包含图表数据)我想显示相应的highstock工具提示。这可能吗? 最佳答案 股票图表thissolution不起作用:在thisexample你必须更换这个:chart.tooltip.refresh(chart.series[0].data[i]);为此:chart.tooltip.refresh([chart.series[0].points[i]]);解决方案可用here.
关闭。这个问题不符合StackOverflowguidelines.它目前不接受答案。要求我们推荐或查找书籍、工具、软件库、教程或其他场外资源的问题对于StackOverflow来说是偏离主题的,因为它们往往会吸引自以为是的答案和垃圾邮件。相反,请描述问题以及迄今为止为解决该问题所做的工作。关闭8年前。Improvethisquestion我正在寻找有关如何阅读EAN-13的图书馆、技术或建议来自图像的条形码(包括ISBN和ISSN编码)。该图像可能来自手机或网络摄像头,因此分辨率可能很差且未对齐。我对可以从rubyonrails中使用的东西特别感兴趣,但欢迎提供其他语言的答案。首
我正在尝试编写一个Python程序,该程序将采用任何小写字母并返回其中最长的字母顺序。以下是代码的一部分。s="abc"#samplestringanslist=[]#storesanswersshift=0#shiftssubstringexpan=0#expandssubstringwhilelen(s)>=1+shift+expan:#withinboundsofsifs[0+shift+expan]>s[1+shift+expan]:#ifnotalphabeticalshift+=1#movessubstringoverelse:#ifalphabeticalwhiles[0+shi
我正在尝试将轴标签添加到NVD3多条形图,但它似乎只适用于x轴。有什么办法解决这个问题吗?我在这里设置了一个例子:http://jsfiddle.net/msts1jha/2/varchart=nv.models.multiBarChart();chart.xAxis.tickFormat(d3.format(',f'));chart.yAxis.tickFormat(d3.format(',.1f'));chart.xAxis.axisLabel("xaxis");chart.yAxis.axisLabel("yaxis"); 最佳答案
我正在使用angular-chart(基于chart.js)创建一些条形图,但无法获得我想要的条形样式。我希望条形图是这样的纯色:但我不知道如何摆脱chart.js默认添加的alpha:我的html看起来像这样:和javascript:angular.module('myApp',['chart.js']).controller('myController',[function(){varctrl=this;ctrl.socialChart={options:{legend:{display:true}},labels:['2012'],series:['FACEBOOK','GOOG
我正在使用GoogleChart显示ColumnChart两件事:1)成功2)失败ForSuccess:Color=GreenForFailed:Color=Red但问题是ColumnChart总是以蓝色显示栏,而且我想要图例:SuccessFailed但它将Legends显示为“值”,如下所示:代码:angular.module("google-chart-sample",["googlechart"]).controller("GenericChartCtrl",function($scope){vardata={"data":{"graphResponse":{"cols":[{
我想通过组合条形图和折线图来创建多系列图表。当我使用rangeBands()设置输出范围时,线从图表中第一个柱的开始处开始绘制,并在最后一个柱的开始处结束。我应该更改什么以使该线从第一个刻度开始并在最后一个刻度结束?vardata=[{date:'1-May-12',close:58.13,open:7.41},{date:'2-May-12',close:53.98,open:45.55},{date:'3-May-12',close:67.00,open:11.78}];varmargin={top:30,right:40,bottom:30,left:50}, width=600
我似乎无法让我的jqplot条形图堆叠。我有以下代码://Pass/Failratesperrequest$.jqplot('passFailPerRequestStats',[passRate,failRate],{title:'AutomationPassCountPerTestPlan',//stackSeries:true,seriesDefaults:{renderer:$.jqplot.BarRenderer,renderOptions:{barMargin:25},pointLabels:{show:true,stackedValue:true}},axesDefault
我有一个包含4个值的数据集。[ABCD]。目前它们显示在条形图中,每个值一个条。现在,由于值c和d是平均值,我想将它们显示为a和b栏后面的线。d3可以吗?如何在同一个数据数组中切换条形或线形显示?感谢您的帮助。 最佳答案 我在这里发布了一个示例,因为没有一个答案在jsbin或jsfiddle等中提供了带线的条形图的工作示例。http://jsbin.com/gisinomo/1/edit该示例是d3wiki上简单条形图的一个分支。http://bl.ocks.org/mbostock/3885304CSSbody{font:10px
序大概就是根据一个灰度图,生成一个地形。分两步来实现吧;首先,用随机数生成地形;然后,根据灰度图生成地形。小白,没啥基础,所以只能慢慢来。参考:【萌新图形学】地形网格生成入门含动画说明哦_哔哩哔哩_bilibili【萌新图形学】地形生成下篇——随机大地形与真实地形_哔哩哔哩_bilibili首先,得有一些基本概念的:00.一些基本概念演示我是个小白,所以,刚开始,来点直观的吧新建了一个空物体gameobject,手动添加了3样东西给它:MeshFilter组件MeshRender组件考虑到没有材质球会成粉色,所以新建了个默认的材质球给它。前两个组件是主要的,下面的动图就简单的演示了这两个组件的