Dargon2的博客

插入图片如何将数据的统计结果以图片的形式插入到绘制的图片中？先使用annotation_custom 方法，后续再添加其它方法的说明；f=read.table("C:\\Users\\XXX\\Desktop\\all.rRNA.txt",head=T)library(png)library(grid)library(ggplot2)summary(f) ## 保存图片mg <- readPNG("C:\\Users\\XXX\\Desktop\\a.png")g <- ras

R 散点图绘制数据情况``a=read.table(“C:\Users\XXX\Desktop\input.txt”,head=T)all=cor.test(alog2FoldChange.US.10059104.D.US.10059068.D.,alog2FoldChange.US.10059104.D.US.10059068.D.,alog2FoldChange.US.10059104.D.US.10059068.D.,alog2FoldChange.US.10059104.H.US.1005

R 柱状图绘制添加数据标签： geom_text()颜色模板： scale_fill_brewer(palette=“Pastel1”)输入：> library(ggplot2)> a=read.table("C:\\Users\\XXX\\Desktop\\GeneExpressionSummary.xls",head=T)> ggplot(a, aes(x=Sample, y=GeneNumber, fill=Batch)) + geom_bar(stat="ident

R 添加均值曲线数据情况计算均值a.mean=aggregate(Value ~ Group, data = a, FUN = “mean”)绘图a=read.table("C:\\Users\\XXX\\Desktop\\result.finnal.xls.plot",head=T)p<-ggplot(a, aes(x=Group, y=Value)) +geom_point(size=2,shape=21,color="gray40")+theme_classic()+ scale_

R boxplot 绘图数据： a=read.table("C:\\Users\\XXX\\Desktop\\a.txt",head=T)ggplot(a, aes(x=factor(Slides), y=Yield, fill=factor(Slides))) + geom_boxplot() +theme_bw() + xlab("Slides Number")+ylab("Yield(ng)") + ggtitle("DNA yield")+scale_y_continuous(limits

R barplot 误差线绘图参考:http://www.cookbook-r.com/Graphs/Plotting_means_and_error_bars_(ggplot2)/数据情况tg=read.table("C:\\Users\\XXX\\Desktop\\quality.txt",head=T)library(Rmisc) library(ggplot2)# Error bars represent standard error of the meantgc <- su

R 折线图绘制数据筛选函数 subset绘图包 ggplot2a=read.table("C:\\Users\\XXX\\Desktop\\data.xls",head=T)b=subset(a,batch=="Batch4" |batch=="Batch5"|batch=="Batch6") ggplot(c, aes(x=datasize, y=GeneNumber,color=SampleID)) + geom_line() + geom_point()+theme_bw()+ scale_

R安装install.packages(“surviaval”)install.packages(“survival”)library(KMsurv)library(survival)测试library(“survival”)library(“survminer”)data(“lung”)fit <- survfit(Surv(time, status) ~ sex, data = lung)surv_diff <- survdiff(Surv(time, status)