consort
1.2.1
consort
的目的是使創建與隨機,對照臨床試驗中參與者分配的透明報告的配偶圖變得容易。這是通過創建標準化的性格數據,並將此數據作為創建標準配偶圖的來源來完成的。通過在節點上提供文本標籤的人類努力也可以實現。
您可以從Cran中安裝發布的Consort版本:
install.packages(“ consort”)
以及Github的開發版本,
#install.packages(“ devtools”)devtools :: install_github(“ adayim/consort”)
這是一個基本示例,它向您展示瞭如何使用給定主題處置數據求解創建配偶圖:
庫(配偶)##基本示例代碼
set.seed(1001)n <-300trialno < - 樣本(c(1000:2000),n)exc < - rep(na,n)exc [sample(1:n,15)] < - sample(c(c )未收集的樣品,“未收集的MRI”,“其他”),15,替換= t,prob = c(0.4,0.4,0.2))ARM <-Rep(na,n)ARM [IS.NA( EXC) ] <-sample(c(“ conc”,“ seq”),sum(is.na(exc)),替換= t)fow1 < - rep(na,n)fow1 [!is.na(arm) ] < - 樣本(C(“撤回”,“停止”,“死亡”,“其他”,NA), sum(!is.na(arm)),替換= t,prob = c(0.05、0.05、0.05、0.05、0.8))fOW2 < - rep(na,n)fow2 [!is.na(arm)&is 。 sum(!is.na(arm)&is.na(fow1)),替換= t, prob = c(0.05,0.05,0.9))df <-data.frame(axec,amm,fow1,fow2) 頭(df)#> trialno exc arm fow1 fow2#> 1 1086 <na> conc <na> <a> <na>>#> 2 1418 <na> seq <a> <a> <a>#> 3 1502 <a> conc <na <na <na >#> 4 1846 <a> conc <a> <a>>#> 5 1303 <a> conc death <a>#> 6 1838 <a> seq <a> < a> <a> <a>
out <-consort_plot(data = df,order = c(afterno =“ supers”,exc =“排除”,arm =“隨機患者”,fow1 =“丟失後續”,triperno =“完成後續後續”,fow2 =“不可評估”,trialno =“最終分析”),side_box = c(“ exc”,“ fow1”,“ fow2”),分配=“ arm”,labels = c(“ 1” =“篩選”,“” 2 “ =“隨機化”,“ 5” =“ final”),cex = 0.6) 繪圖(OUT)
由於grid
繪製不是非常理想的,因此節點的凝聚力的計算並不容易,並且盡了最大的努力。如果您想改進,請隨時進行公關。或者,您可以通過在plot
中設置grViz = TRUE
來產生Graphviz
圖。這將使用DiagrammeR
打印劇情。該圖是閃亮或HTML輸出的理想選擇。
情節(out,grviz = true)
或將此Graphviz
圖保存到png
或pdf
繪圖(g,grviz = true)|> diagrammersvg :: export_svg()|> ChartOraw()|> rsvg :: rsvg_pdf(“ svg_graph.pdf”)