projects
/
morpheus.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Fix default weights, fix reporting scripts
[morpheus.git]
/
pkg
/
R
/
optimParams.R
diff --git
a/pkg/R/optimParams.R
b/pkg/R/optimParams.R
index
85c21e7
..
06d1684
100644
(file)
--- a/
pkg/R/optimParams.R
+++ b/
pkg/R/optimParams.R
@@
-59,7
+59,7
@@
optimParams = function(K, link=c("logit","probit"), optargs=list())
weights <- optargs$weights
if (is.null(weights))
- weights <- rep(1,
K
)
+ weights <- rep(1,
3
)
# Build and return optimization algorithm object
methods::new("OptimParams", "li"=link, "M1"=as.double(M[[1]]),