WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

治験薬の有効性

新しい腫瘍抑制剤の効果について興味を持っている研究者は，癌患者の腫瘍ができるまでの時間を記録した．43人の患者は古い薬(A)の投薬を受け，76人は新しい薬(B)の投薬を受けた．

Wolfram Language code: drugA = EventData[43]; drugB = EventData[76];
生存関数は交差する：
Wolfram Language code: Plot[Evaluate[SurvivalModelFit[#][t]& /@ {drugA, drugB}], {t, 0, 15}, PlotLegends -> {"A", "B"}, Exclusions -> None]
LogRankTestは潜在するハザード率に有意な違いを検知しない：
Wolfram Language code: LogRankTest[{drugA, drugB}, Automatic, "TestDataTable"]
研究者は，新しい薬が後から発症する腫瘍を防ぐのにより効果的であると期待するとする．次のFleming–Harringtonの重みは，遅発性の生存時間を強調する：
Wolfram Language code: ListLinePlot[LogRankTest[{drugA, drugB}, {1, 1}, "EventWeights"], AxesLabel -> {"生存時間", "重み"}]
遅発性の生存率に重みを付けたLogRankTestは，有意な差異を検知する：
Wolfram Language code: LogRankTest[{drugA, drugB}, {1, 1}, "TestDataTable"]