removed sapply

mllg · mllg · commit 493a796c7ba0 · 2017-01-24T13:01:19.000+01:00
diff --git a/R/makeMBOInfillCriterion.R b/R/makeMBOInfillCriterion.R
@@ -86,7 +86,7 @@ print.MBOInfillCriterion = function(x, ...) {
 }
 
 paramsToString = function(params) {
-  str.params = sapply(names(params), function(n) {
+  str.params = vcapply(names(params), function(n) {
     paste0(n, "=", params[[n]])
   })
   collapse(str.params, ", ")

Original file line number	Diff line number	Diff line change
`@@ -86,7 +86,7 @@ print.MBOInfillCriterion = function(x, ...) {`
`86`	`86`	`}`
`87`	`87`
`88`	`88`	`paramsToString = function(params) {`
`89`		`- str.params = sapply(names(params), function(n) {`
	`89`	`+ str.params = vcapply(names(params), function(n) {`
`90`	`90`	`paste0(n, "=", params[[n]])`
`91`	`91`	`})`
`92`	`92`	`collapse(str.params, ", ")`