plot_2tcm1kfit: Plot: Two Tissue Compartment Model with Irreversible Trapping

View source: R/kinfitr_2tcm1k.R

plot_2tcm1kfitR Documentation

Plot: Two Tissue Compartment Model with Irreversible Trapping

Description

Function to visualise the fit of the Two Tissue Compartment Model with Irreversible Trapping to data.

Usage

plot_2tcm1kfit(twotcm1kout, roiname = NULL)

Arguments

twotcm1kout

The output object of the 2TCM1k fitting procedure.

roiname

Optional. The name of the Target Region to see it on the plot.

Value

A ggplot2 object of the plot.

Author(s)

Granville J Matheson, mathesong@gmail.com

References

Rizzo, G., Veronese, M., Tonietto, M., Zanotti-Fregonara, P., Turkheimer, F. E., & Bertoldo, A. (2014). Kinetic modeling without accounting for the vascular component impairs the quantification of [11C] PBR28 brain PET data. Journal of Cerebral Blood Flow & Metabolism, 34(6), 1060-1069.

Examples


data(pbr28)

t_tac <- pbr28$tacs[[2]]$Times / 60
tac <- pbr28$tacs[[2]]$FC
weights <- pbr28$tacs[[2]]$Weights

input <- blood_interp(
  pbr28$procblood[[2]]$Time / 60, pbr28$procblood[[2]]$Cbl_dispcorr,
  pbr28$procblood[[2]]$Time / 60, pbr28$procblood[[2]]$Cpl_metabcorr,
  t_parentfrac = 1, parentfrac = 1
)

fit <- twotcm1k(t_tac, tac, input, weights)

plot_2tcm1kfit(fit)

mathesong/kinfitr documentation built on Jan. 15, 2024, 11:07 p.m.