apply_par_list
apply_par_list(xyz_m, par_list)
xyz_m | |
---|---|
par_list |
##---- Should be DIRECTLY executable !! ---- ##-- ==> Define data, use random, ##-- or do help(data=index) for the standard data sets. ## The function is currently defined as apply_par_list <- function(xyz_m, par_list) { q1 <- par_list[1] q2 <- par_list[2] q3 <- par_list[3] q4 <- par_list[4] t1 <- par_list[5] t2 <- par_list[6] t3 <- par_list[7] R <- q2r(q1, q2, q3, q4) Tr <- c(t1, t2, t3) xyz_a <- R#> Error: <text>:17:0: unexpected end of input #> 15: Tr <- c(t1, t2, t3) #> 16: xyz_a <- R #> ^# NOT RUN { # }xyz_a }#> Error: <text>:2:3: unexpected '}' #> 1: xyz_a #> 2: } #> ^