Displaying 1 result from an estimated 1 matches for "predlabels".
2009 Apr 30
0
Categorical variable in a custom nonlin function with gnm
...ing a custom nonlin function:
> gnm_function<- function(B1, B2, B3, B4, B5){
+ list(
+ predictors = list(B1=1, B2=1, B3=1, B4=1, B5=1),
+ variables = list(substitute(LithologyB), substitute(LithologyC), substitute(LithologyD), substitute(LithologyE), substitute(LithologyF)),
+ term = function(predLabels, varLabels) {
+ paste(
+ predLabels[1], "*", varLabels[1], "+", predLabels[2], "*", varLabels[2], "+", predLabels[3], "*", varLabels[3], "+", predLabels[4], "*", varLabels[4], "+", predLabels[5], "*", varLabel...