File:Pre-term corticosteroid data.svg
来自Wikimedia Commons
跳转到导航
跳转到搜索
此SVG文件的PNG预览的大小:684 × 309像素。 其他分辨率:320 × 145像素 | 640 × 289像素 | 1,024 × 463像素 | 1,280 × 578像素 | 2,560 × 1,156像素。
原始文件 (SVG文件,尺寸为684 × 309像素,文件大小:95 KB)
文件信息
结构化数据
说明
摘要
[编辑]描述Pre-term corticosteroid data.svg |
English: This forest plot shows trials of the use of corticosteroids to hasten lung development in pre-term babies. It is an iconic illustration of the power of medical reviews to save lives. The iconic review is from the 1980s, so this plot does not contain all the evidence of the up-to-date version of the same review.
This data is the data from which the logo for Cochrane (organisation) is derived. |
日期 | |
来源 | Source code modified by User:HLHJ from the data and plotting scripts supplied with the GPL-2-licensed software package rmeta (part of the R statistical environment). See rmeta documentation. |
作者 | Thomas Lumley, User:HLHJ |
SVG开发 InfoField | |
原始码 InfoField | R codeinstall.packages("rmeta")
library(rmeta)
data(cochrane)
svg("cochrane_logo_data.svg",width=9,height=4.35)
steroid <- meta.MH(n.trt, n.ctrl, ev.trt, ev.ctrl,
names=name, data=cochrane)
tabletext<-cbind(
c("","Study",steroid$names,NA,"Summary"), #Just tags, not single-author papers
# c("","Year",c(1111,1111,1111,1111,1111,1111,1111),NA,NA), #Don't have this data
c("Deaths","(corticosteroid)",cochrane$ev.trt,NA,NA),
c("Deaths","(placebo)", cochrane$ev.ctrl, NA,NA),
c("","Odds ratio",format(exp(steroid$logOR),digits=2),NA,format(exp(steroid$logMH),digits=2))
)
m<- c(NA,NA,steroid$logOR,NA,steroid$logMH) #Mean
l<- m-c(NA,NA,steroid$selogOR,NA,steroid$selogMH)*2 #Lower
u<- m+c(NA,NA,steroid$selogOR,NA,steroid$selogMH)*2 #Upper
forestplot(tabletext,m,l,u,zero=0,is.summary=c(TRUE,TRUE,rep(FALSE,8),TRUE),
clip=c(log(0.015),log(3)), xlog=TRUE,
xticks=c(0.01,0.1,1,2,4),
col=meta.colors(box="royalblue",line="darkblue", summary="royalblue"))
forestplot(tabletext,m,l,u,zero=0,is.summary=c(TRUE,TRUE,rep(FALSE,8),TRUE),
clip=c(log(0.015),log(3)), xlog=TRUE,
#boxsize=0.75,
xticks=c(0.01,0.1,1,2,4),
xlab="\nOdds ratio with 95% confidence interval\n(1=no effect, <1=treatment has fewer deaths)",
col=meta.colors(box="royalblue",line="darkblue", summary="royalblue"))
dev.off()
|
This work is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; version 2. This work is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See version 2 of the GNU General Public License for more details. GNU General Public License v2GPLv2https://www.gnu.org/licenses/old-licenses/gpl-2.0.htmltrue |
文件历史
点击某个日期/时间查看对应时刻的文件。
日期/时间 | 缩略图 | 大小 | 用户 | 备注 | |
---|---|---|---|---|---|
当前 | 2017年10月21日 (六) 20:00 | 684 × 309(95 KB) | HLHJ(留言 | 贡献) | Took out background and cropped using Inkscape | |
2017年10月21日 (六) 18:13 | 810 × 391(63 KB) | HLHJ(留言 | 贡献) | User created page with UploadWizard |
您不可以覆盖此文件。
文件用途
没有页面使用本文件。
全域文件用途
以下其他wiki使用此文件:
- en.wikipedia.org上的用途
- fr.wikipedia.org上的用途
- he.wikipedia.org上的用途
- ja.wikipedia.org上的用途
- pl.wikipedia.org上的用途
- zh.wikipedia.org上的用途
元数据
此文件含有额外信息,这些信息可能是创建或数字化该文件时使用的数码相机或扫描仪所添加的。如果文件已从其原始状态修改,某些详细信息可能无法完全反映修改后的文件。
宽度 | 547.35938pt |
---|---|
高度 | 247.38327pt |