insert_dollar: Insert a new subroutine into control file_contents

In NMproject: Script Based 'NONMEM' Model Development

Insert a new subroutine into control file_contents

Description

Mostly a back end function used by other functions.

Usage

insert_dollar(m, dollar, text, after_dollar)

Arguments

m	An nm object.
dollar	Character. Name of subroutine to insert.
text	Character vector. Text to fill.
after_dollar	Character name of preceding subroutine. The new subroutine will be inserted immediately after it.

Value

An nm object with modified ctl_contents field.

Examples

# create example object m1 from package demo files
exdir <- system.file("extdata", "examples", "theopp", package = "NMproject")
m1 <- new_nm(run_id = "m1", 
             based_on = file.path(exdir, "Models", "ADVAN2.mod"),
             data_path = file.path(exdir, "SourceData", "THEOPP.csv"))

m1 <- m1 %>% insert_dollar("MODEL", "
$MODEL
COMP = (CENTRAL)
", after_dollar = "SUB")

m1 %>% dollar("MODEL")

NMproject documentation built on Sept. 30, 2022, 1:06 a.m.