{"action":"created","issue":{"url":"https://api.github.com/repos/mlr-org/mlr/issues/872","repository_url":"https://api.github.com/repos/mlr-org/mlr","labels_url":"https://api.github.com/repos/mlr-org/mlr/issues/872/labels{/name}","comments_url":"https://api.github.com/repos/mlr-org/mlr/issues/872/comments","events_url":"https://api.github.com/repos/mlr-org/mlr/issues/872/events","html_url":"https://github.com/mlr-org/mlr/issues/872","id":153284709,"number":872,"title":"Tests fail for 'featsel'","user":{"login":"MasonGallo","id":4913951,"avatar_url":"https://avatars.githubusercontent.com/u/4913951?v=3","gravatar_id":"","url":"https://api.github.com/users/MasonGallo","html_url":"https://github.com/MasonGallo","followers_url":"https://api.github.com/users/MasonGallo/followers","following_url":"https://api.github.com/users/MasonGallo/following{/other_user}","gists_url":"https://api.github.com/users/MasonGallo/gists{/gist_id}","starred_url":"https://api.github.com/users/MasonGallo/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/MasonGallo/subscriptions","organizations_url":"https://api.github.com/users/MasonGallo/orgs","repos_url":"https://api.github.com/users/MasonGallo/repos","events_url":"https://api.github.com/users/MasonGallo/events{/privacy}","received_events_url":"https://api.github.com/users/MasonGallo/received_events","type":"User","site_admin":false},"labels":[],"state":"open","locked":false,"assignee":null,"milestone":null,"comments":2,"created_at":"2016-05-05T17:46:16Z","updated_at":"2016-05-05T18:37:09Z","closed_at":null,"body":"I just setup my dev environment on a new mac with a fresh copy of mlr cloned this morning to fix #815 . Running the test for featsel below fails:\r\n\r\n`devtools::test(filter = \"featsel\")`\r\n\r\nThe first failed dialog is - looks like it has to do with how filterFeatures is called:\r\n\r\n```\r\n1. Error: filterFeatures (@test_featsel_filterFeatures.R#5) ----------------------------\r\nAn error has occurred in the grow algorithm.  Please turn trace on for further analysis.\r\n1: filterFeatures(binaryclass.task, select = \"threshold\", threshold = -Inf) at /Users/mason/projects/mlr/tests/testthat/test_featsel_filterFeatures.R:5\r\n\r\n```\r\nIs this reproducible on other machines?\r\n\r\nOutput of R.version on my local machine:\r\n\r\n```\r\nplatform      x86_64-apple-darwin13.4.0   \r\narch           x86_64                      \r\nos             darwin13.4.0                \r\nsystem         x86_64, darwin13.4.0        \r\nstatus                                     \r\nmajor          3                           \r\nminor          3.0                         \r\nyear           2016                        \r\nmonth          05                          \r\nday            03                          \r\nsvn rev        70573                       \r\nlanguage       R                           \r\nversion.string R version 3.3.0 (2016-05-03)\r\nnickname       Supposedly Educational\r\n```\r\n"},"comment":{"url":"https://api.github.com/repos/mlr-org/mlr/issues/comments/217236829","html_url":"https://github.com/mlr-org/mlr/issues/872#issuecomment-217236829","issue_url":"https://api.github.com/repos/mlr-org/mlr/issues/872","id":217236829,"user":{"login":"MasonGallo","id":4913951,"avatar_url":"https://avatars.githubusercontent.com/u/4913951?v=3","gravatar_id":"","url":"https://api.github.com/users/MasonGallo","html_url":"https://github.com/MasonGallo","followers_url":"https://api.github.com/users/MasonGallo/followers","following_url":"https://api.github.com/users/MasonGallo/following{/other_user}","gists_url":"https://api.github.com/users/MasonGallo/gists{/gist_id}","starred_url":"https://api.github.com/users/MasonGallo/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/MasonGallo/subscriptions","organizations_url":"https://api.github.com/users/MasonGallo/orgs","repos_url":"https://api.github.com/users/MasonGallo/repos","events_url":"https://api.github.com/users/MasonGallo/events{/privacy}","received_events_url":"https://api.github.com/users/MasonGallo/received_events","type":"User","site_admin":false},"created_at":"2016-05-05T18:37:09Z","updated_at":"2016-05-05T18:37:09Z","body":"Thanks! I only posted a snippet to avoid the wall of text in case it was something obvious. I will look into testing on another machine/VM. The full output is below:\r\n\r\n```\r\nanalyzeFeatSelResult: ..\r\nFeatSelWrapper: ...\r\nfilterFeatures: <simpleError in .Call(\"rfsrcGrow\", as.integer(do.trace), as.integer(seed), as.integer(impute.only.bits +     var.used.bits + split.depth.bits + importance.bits + bootstrap.bits +     forest.bits + proximity.bits + split.null.bits + perf.bits +     membership.bits + statistics.bits), as.integer(0 + na.action.bits +     fast.restore.bits + split.cust.bits), as.integer(splitinfo$index),     as.integer(splitinfo$nsplit), as.integer(mtry), as.integer(if (is.na(formulaDetail$ytry)) 0 else formulaDetail$ytry),     as.integer(nodesize), as.integer(nodedepth), as.double(cause.wt),     as.integer(ntree), as.integer(n), as.integer(length(yvar.types)),     as.character(yvar.types), as.integer(yvar.nlevels), as.double(as.vector(yvar)),     as.integer(n.xvar), as.character(xvar.types), as.integer(xvar.nlevels),     as.double(xvar.wt), as.double(xvar), as.integer(length(event.info$time.interest)),     as.double(event.info$time.interest), as.double(miss.tree),     as.integer(nimpute), as.integer(get.rf.cores())): \"rfsrcGrow\" not resolved from current namespace (randomForestSRC)>\r\n1<simpleError in .Call(\"rfsrcGrow\", as.integer(do.trace), as.integer(seed), as.integer(impute.only.bits +     var.used.bits + split.depth.bits + importance.bits + bootstrap.bits +     forest.bits + proximity.bits + split.null.bits + perf.bits +     membership.bits + statistics.bits), as.integer(0 + na.action.bits +     fast.restore.bits + split.cust.bits), as.integer(splitinfo$index),     as.integer(splitinfo$nsplit), as.integer(mtry), as.integer(if (is.na(formulaDetail$ytry)) 0 else formulaDetail$ytry),     as.integer(nodesize), as.integer(nodedepth), as.double(cause.wt),     as.integer(ntree), as.integer(n), as.integer(length(yvar.types)),     as.character(yvar.types), as.integer(yvar.nlevels), as.double(as.vector(yvar)),     as.integer(n.xvar), as.character(xvar.types), as.integer(xvar.nlevels),     as.double(xvar.wt), as.double(xvar), as.integer(length(event.info$time.interest)),     as.double(event.info$time.interest), as.double(miss.tree),     as.integer(nimpute), as.integer(get.rf.cores())): \"rfsrcGrow\" not resolved from current namespace (randomForestSRC)>\r\n2\r\nFilterWrapper: ..........\r\nselectFeatures: ..................\r\n\r\nFailed ---------------------------------------------------------------------------------\r\n1. Error: filterFeatures (@test_featsel_filterFeatures.R#5) ----------------------------\r\nAn error has occurred in the grow algorithm.  Please turn trace on for further analysis.\r\n1: filterFeatures(binaryclass.task, select = \"threshold\", threshold = -Inf) at /Users/mason/projects/mlr/tests/testthat/test_featsel_filterFeatures.R:5\r\n2: generateFilterValuesData(task = task, method = method, nselect = nselect, ...) at /Users/mason/projects/mlr/R/filterFeatures.R:45\r\n3: lapply(filter, function(x) {\r\n       x = do.call(x$fun, c(list(task = task, nselect = nselect), list(...)))\r\n       missing.score = setdiff(fn, names(x))\r\n       x[missing.score] = NA_real_\r\n       x[match(names(x), fn)]\r\n   }) at /Users/mason/projects/mlr/R/generateFilterValues.R:53\r\n4: FUN(X[[i]], ...)\r\n5: do.call(x$fun, c(list(task = task, nselect = nselect), list(...))) at /Users/mason/projects/mlr/R/generateFilterValues.R:54\r\n6: (function (task, nselect, ...) \r\n   {\r\n       im = randomForestSRC::rfsrc(getTaskFormula(task), data = getTaskData(task), proximity = FALSE, \r\n           forest = FALSE, importance = \"permute\", ...)$importance\r\n       if (inherits(task, \"ClassifTask\")) {\r\n           ns = rownames(im)\r\n           y = im[, \"all\"]\r\n       }\r\n       else {\r\n           ns = names(im)\r\n           y = unname(im)\r\n       }\r\n       setNames(y, ns)\r\n   })(task = structure(list(type = \"classif\", env = <environment>, weights = NULL, blocking = NULL, \r\n       task.desc = structure(list(id = \"binary\", type = \"classif\", target = \"Class\", size = 208L, \r\n           n.feat = structure(c(60L, 0L, 0L), .Names = c(\"numerics\", \"factors\", \"ordered\")), \r\n           has.missings = FALSE, has.weights = FALSE, has.blocking = FALSE, class.levels = c(\"M\", \r\n           \"R\"), positive = \"M\", negative = \"R\"), .Names = c(\"id\", \"type\", \"target\", \"size\", \r\n       \"n.feat\", \"has.missings\", \"has.weights\", \"has.blocking\", \"class.levels\", \"positive\", \r\n       \"negative\"), class = c(\"TaskDescClassif\", \"TaskDescSupervised\", \"TaskDesc\"))), .Names = c(\"type\", \r\n   \"env\", \"weights\", \"blocking\", \"task.desc\"), class = c(\"ClassifTask\", \"SupervisedTask\", \"Task\"\r\n   )), nselect = 60L, select = \"threshold\")\r\n7: randomForestSRC::rfsrc(getTaskFormula(task), data = getTaskData(task), proximity = FALSE, \r\n       forest = FALSE, importance = \"permute\", ...) at /Users/mason/projects/mlr/R/Filter.R:146\r\n8: stop(\"An error has occurred in the grow algorithm.  Please turn trace on for further analysis.\")\r\n\r\n2. Error: plotFilterValues (@test_featsel_filterFeatures.R#86) -------------------------\r\nAn error has occurred in the grow algorithm.  Please turn trace on for further analysis.\r\n1: generateFilterValuesData(binaryclass.task, method = c(\"chi.squared\", \"rf.importance\")) at /Users/mason/projects/mlr/tests/testthat/test_featsel_filterFeatures.R:86\r\n2: lapply(filter, function(x) {\r\n       x = do.call(x$fun, c(list(task = task, nselect = nselect), list(...)))\r\n       missing.score = setdiff(fn, names(x))\r\n       x[missing.score] = NA_real_\r\n       x[match(names(x), fn)]\r\n   }) at /Users/mason/projects/mlr/R/generateFilterValues.R:53\r\n3: FUN(X[[i]], ...)\r\n4: do.call(x$fun, c(list(task = task, nselect = nselect), list(...))) at /Users/mason/projects/mlr/R/generateFilterValues.R:54\r\n5: (function (task, nselect, ...) \r\n   {\r\n       im = randomForestSRC::rfsrc(getTaskFormula(task), data = getTaskData(task), proximity = FALSE, \r\n           forest = FALSE, importance = \"permute\", ...)$importance\r\n       if (inherits(task, \"ClassifTask\")) {\r\n           ns = rownames(im)\r\n           y = im[, \"all\"]\r\n       }\r\n       else {\r\n           ns = names(im)\r\n           y = unname(im)\r\n       }\r\n       setNames(y, ns)\r\n   })(task = structure(list(type = \"classif\", env = <environment>, weights = NULL, blocking = NULL, \r\n       task.desc = structure(list(id = \"binary\", type = \"classif\", target = \"Class\", size = 208L, \r\n           n.feat = structure(c(60L, 0L, 0L), .Names = c(\"numerics\", \"factors\", \"ordered\")), \r\n           has.missings = FALSE, has.weights = FALSE, has.blocking = FALSE, class.levels = c(\"M\", \r\n           \"R\"), positive = \"M\", negative = \"R\"), .Names = c(\"id\", \"type\", \"target\", \"size\", \r\n       \"n.feat\", \"has.missings\", \"has.weights\", \"has.blocking\", \"class.levels\", \"positive\", \r\n       \"negative\"), class = c(\"TaskDescClassif\", \"TaskDescSupervised\", \"TaskDesc\"))), .Names = c(\"type\", \r\n   \"env\", \"weights\", \"blocking\", \"task.desc\"), class = c(\"ClassifTask\", \"SupervisedTask\", \"Task\"\r\n   )), nselect = 60L)\r\n6: randomForestSRC::rfsrc(getTaskFormula(task), data = getTaskData(task), proximity = FALSE, \r\n       forest = FALSE, importance = \"permute\", ...) at /Users/mason/projects/mlr/R/Filter.R:146\r\n7: stop(\"An error has occurred in the grow algorithm.  Please turn trace on for further analysis.\")\r\n\r\nDONE ===================================================================================\r\n```"}}