if (FALSE) {
# First create some sample data
eefrt01 <- data.frame(
src_subject_id = c("SUB001", "SUB002"),
interview_age = c(240, 360),
interview_date = c("01/01/2023", "02/15/2023"),
response_time = c(450, 520)
)
# Create the NDA template using the data frame directly
to.nda(eefrt01)
# Or using the name as a string
to.nda("eefrt01")
# Skip the confirmation prompt
to.nda(eefrt01, skip_prompt = TRUE)
}
Run the code above in your browser using DataLab