Re: Updating xpose4 stratification headers in VPCs
Dear Rik,
You can alter the sub headings with 'main.sub=c("Plot 1 name","Plot 2
name", ...)'
It is also worth knowing that you can select plots for specific strata this
way:
VPCS <- xpose4::xpose.VPC(pc.info='vpc_results.csv', vpctab='vpctab008')
listVPCS <- VPCS@plotList # List of VPC plots for all strata
VPC1 <- listVPCS[[1]] # VPC for first strata
VPC2 <- listVPCS[[2]] # VPC for second strata
Kind regards,
Martin Bergstrand, Ph.D.
Principal Consultant
Pharmetheus AB
+46(0)709 994 396
[email protected]
www.pharmetheus.com
*This communication is confidential and is only intended for the use of the
individual or entity to which it is directed. It may contain information
that is privileged and exempt from disclosure under applicable law. If you
are not the intended recipient please notify us immediately. Please do not
copy it or disclose its contents to any other person.*
Quoted reply history
On Thu, Sep 24, 2020 at 8:43 AM Rik Schoemaker <[email protected]>
wrote:
> Dear all,
>
>
>
> I realise that xpose4 is perceived as getting a bit old, but as far as I
> can tell it is still very widely used in the community, and auto-generated
> R-code from PsN still uses xpose4. My own hesitation has always been in the
> perceived lack of options to customise the output, but it has so many handy
> features 😊. Currently I'm running VPCs with multi-level stratification
> implemented using the STRT variable in NONMEM code, and my resulting VPCs
> have 4 graphs. However, the headings of these graphs are the pretty ugly
> "STRT==0.5", "STRT==101" etc. Is there a way to change this to a nice
> factor with customisable layout? And while we're at it: is there a way to
> access/extract the individual graphs so these can be formatted and/or
> printed separately?
>
>
>
> Thanks very much in advance!
>
>
>
> Kind regards,
>
>
>
> Rik
>
>
>
>
>
> xpose4::xpose.VPC(pc.info='vpc_results.csv',
>
> vpctab='vpctab008',#xlim=c(0,42),
>
>
> PI='lines',type='n',PI.identify.outliers=FALSE,#by='STRT',
>
> PI.x.median=TRUE,
>
> PI.ci.area.smooth=TRUE,
>
> PI.rug=FALSE,
>
> PI.ci.up.arcol="dodgerblue",
>
> PI.ci.down.arcol="dodgerblue",
>
> PI.real.med.col="brown",
>
> PI.real.up.col="brown",
>
> PI.real.down.col="brown",col="brown",
>
> main="VPC final model",ylb="Drug X
> (ng/mL)",xlb="Time (h)",ylim=c(0.01,120),logy=TRUE,
>
> scales = list(x = list(at = seq(0,36,3))))
>
>
>
>
>
> *Rik Schoemaker, PhD*
>
> *Occams *Coöperatie U.A.
> Malandolaan 10
> 1187 HE Amstelveen
> The Netherlands
>
> www.occams.com
>
> +31 20 441 6410
> [email protected]
>
>
>
>
>
--
Martin Bergstrand, Ph.D.
Principal Consultant
Pharmetheus AB
+46(0)709 994 396
[email protected]
www.pharmetheus.com
+46(0)18 513 328
U-A Science Park, Dag Hammarskjölds v. 36b
752 37 Uppsala, Sweden
*This communication is confidential and is only intended for the use of the
individual or entity to which it is directed. It may contain information
that is privileged and exempt from disclosure under applicable law. If you
are not the intended recipient please notify us immediately. Please do not
copy it or disclose its contents to any other person.*