我有这个想法,从我的散点图中创建一个动画gif,并想一想是否有可能。
我在散点图中大概有1000 - 2000个点,并且认为我是否可以让R为第一个点生成1个绘图,第一个+第二个点生成1个绘图,第一个+第二个点生成1个绘图,所以通过这种方式,我可以获得我的剧情的动画GIF,并使我的演示更有趣和有趣。
有一种方法可以在脚本中保存png吗?
任何人至少可以说是否有可能在第一时间做到这一点?
这是我的代码
volcano_plot_mix <- ggplot(data=resultado_table3, aes(x=log2FoldChange, y=- log10(padj))) +
geom_point(data=data_shape, size=2, shape=6) +
geom_point(data=resultado_table3[resultado_table3$threshold==TRUE, ], size=2, colour="#CC0000") +
geom_point(data=resultado_table3[resultado_table3$threshold2==TRUE, ], size=2, colour="#000099")+
#scale_colour_manual(name="Legenda",values=legend) +
xlab("\n log2 fold change") +
ylab("-log10 p-value adjusted \n") +
ggtitle("Controle Vs Mistura")+
scale_x_continuous(limit=c(-6,3), breaks=c(-6,-5,-4,-3,-2,-1,0,1,2,3)) +
scale_y_continuous(limit=c(0,50)) +
theme_bw() +
theme(axis.title.y = element_text(face="bold", size=16, colour="white"),
axis.title.x = element_text(face="bold", size=16, colour="white"),
axis.text = element_text(size=12),
legend.title =element_blank() ,
legend.text = element_text(size = 12))
volcano_plot_mix
和我的data.frame:
row.names baseMean log2FoldChange lfcSE stat pvalue padj threshold threshold2
1 ENSMUSG00000000001 271.556874 -0.2586453163 0.1932363 -1.33849262 1.807359e-01 3.245108e-01 FALSE FALSE
2 ENSMUSG00000000028 14.425989 -0.7678419135 0.4871996 -1.57603155 1.150185e-01 2.306094e-01 FALSE FALSE
3 ENSMUSG00000000031 243.168564 2.8036752381 0.1859020 15.08146607 2.144536e-51 4.498238e-49 TRUE FALSE
4 ENSMUSG00000000049 5.494035 -0.4191875260 0.6160034 -0.68049552 4.961908e-01 6.568972e-01 FALSE FALSE
5 ENSMUSG00000000056 507.039921 0.6190059663 0.1371111 4.51463200 6.342681e-06 4.937424e-05 FALSE FALSE
6 ENSMUSG00000000058 598.257239 1.2975264408 0.1510505 8.59001843 8.695538e-18 3.268956e-16 TRUE FALSE
7 ENSMUSG00000000078 542.650626 -0.8415712222 0.1891324 -4.44964026 8.601424e-06 6.552488e-05 FALSE FALSE
8 ENSMUSG00000000085 103.272511 -0.2538031364 0.2236255 -1.13494746 2.563973e-01 4.196936e-01 FALSE FALSE
9 ENSMUSG00000000088 2289.066560 0.8291929325 0.1194602 6.94116312 3.888847e-12 7.960698e-11 FALSE FALSE
10 ENSMUSG00000000093 19.973601 -0.4603336297 0.4165947 -1.10499166 2.691632e-01 4.349332e-01 FALSE FALSE
11 ENSMUSG00000000120 10.267475 -1.4756032832 0.5527286 -2.66967051 7.592571e-03 2.555670e-02 FALSE TRUE
12 ENSMUSG00000000126 26.757132 0.7317334670 0.3630208 2.01567904 4.383355e-02 1.086051e-01 FALSE FALSE