Skip to content
Snippets Groups Projects
Commit 92193c49 authored by dj44vuri's avatar dj44vuri
Browse files

small change in purrr file

parent 7016e75f
No related branches found
No related tags found
No related merge requests found
...@@ -25,9 +25,9 @@ designname <- str_remove_all(list.files(designpath,full.names = F), ...@@ -25,9 +25,9 @@ designname <- str_remove_all(list.files(designpath,full.names = F),
tictoc::tic() tictoc::tic()
browser()
if (!exists("destype")) destype="ngene" if (!exists("destype")) destype="ngene"
browser()
all_designs<- purrr::map(designfile, sim_choice, all_designs<- purrr::map(designfile, sim_choice,
no_sim= nosim,respondents = resps, mnl_U = mnl_U, destype=destype) %>% no_sim= nosim,respondents = resps, mnl_U = mnl_U, destype=destype) %>%
setNames(designname) setNames(designname)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment