R语言里面漂亮的散点图

散点图通常是用来表述两个连续变量之间的关系，图中的每个点表示目标数据集中的每个样本。同时散点图中常常还会拟合一些直线，以用来表示某些模型。

> library(ggplot2)> ggplot(cancer4, aes(x = cancer4$`Platelets on admission`, y = cancer4$`APACHE II on admission`))++ geom_point()> ggplot(cancer4, aes(x = cancer4$`Platelets on admission`, y = cancer4$`APACHE II on admission`,colour=apachegroup)) +geom_point()ggplot(cancer4, aes(x = cancer4$`Platelets on admission`, y = cancer4$`APACHE II on admission`,colour=cancer4$`ICU survival`)) +geom_point()+scale_colour_brewer(palette = "Set1") +geom_smooth(method = lm)> ggplot(cancer4, aes(x = cancer4$`Platelets on admission`, y = cancer4$`APACHE II on admission`,colour=cancer4$`ICU survival`)) +geom_point()+scale_colour_brewer(palette = "Set1") +geom_smooth()

BMJ:论文被拒最常见的理由：

1. 研究并未关注重要的科学专题

2. 研究并非原创，或者他人已有相同或者相似报道

3. 研究并未真正验证作者自己提出的假设，也就是文不对题

4. 应进行相同目的，但不同类型的研究

5. 实际操作困难，使得作者偏离原初合理的研究设计方案

6. 样本量不够

7. 实验条件不好或者控制不充分

8. 统计学方法不对或者不恰当

9. 作者未能公开客观地从研究结果中去得出结论

10. 存在利益冲突

11. 论文语言写作和表达太差，难以理解

Trisha greenhalgh. How to read a paper:The basics of evidence of medicine. London:Bmj publishing group,1997.