Skip to content

Commit

Permalink
Merge branch 'profile_control' into main
Browse files Browse the repository at this point in the history
  • Loading branch information
Chantel Wetzel committed Jun 28, 2023
2 parents c8afc04 + d4bd2bc commit d5ac65a
Showing 1 changed file with 0 additions and 8 deletions.
8 changes: 0 additions & 8 deletions R/profile_wrapper.R
Original file line number Diff line number Diff line change
Expand Up @@ -173,14 +173,6 @@ profile_wrapper <- function(mydir, model_settings) {
# loop over down, then up
for (iprofile in 1:2) {
whichruns <- which(vec %in% if(iprofile == 1){low} else {high})
#if (iprofile == 1) {
# whichruns <- which(vec %in% low)
# if (!is.null(model_settings$whichruns)) {
# whichruns <- intersect(model_settings$whichruns, whichruns)
# }
#}
#if (iprofile == 2) {
# whichruns <- which(vec %in% high)
if (!is.null(model_settings$whichruns)) {
whichruns <- intersect(model_settings$whichruns, whichruns)
}
Expand Down

0 comments on commit d5ac65a

Please sign in to comment.