如何将两个模型绘制成一个图形

本文介绍了如何将两个模型绘制成一个图形的处理方法，对大家解决问题具有一定的参考价值，需要的朋友们下面随着小编来一起学习吧！

问题描述

我使用 DoseFinds 来构建这两个模型，我想将两个模型绘制在同一张图上进行比较.

I used DoseFinds to building the two models and I want toplot both model on the same graph to compare.

library(DoseFinding)
doses <- c(0, 10, 25, 50, 100, 150)
fmodels <- Mods(emax = 25,
            doses=doses, placEff = 0.5, maxEff = -0.4,
            addArgs=list(scal=200))

fmodels2 <- Mods(emax = 25,
            doses=doses, placEff = -1.5, maxEff = -1.4,
            addArgs=list(scal=200))
plot(fmodels)
plot(fmodels2)

推荐答案

将两件事合二为一:

doses <- c(0, 10, 25, 50, 100, 150)
fmodels2 <- Mods(emax = c(25,25),
doses=doses, placEff = c(0.5,-1.5), maxEff = c(-0.4,-1.4),
addArgs=list(scal=200))

然后用 superpose=TRUE 绘图:

plot(fmodels2, superpose=TRUE)

这两条线没有太多重叠，所以虽然看起来像两个独立的图形，但它不是！

The two lines don't overlap much so although it looks like two separate graphs, it isnt!

这篇关于如何将两个模型绘制成一个图形的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！