one 'if condition' in the spls function is hanging

Create issue
Issue #6 resolved
Florian Rohart created an issue

line 324 in the regression mode:

      if (TRUE)                       #!?!?
        {#na.Y
            Y.aux = Y.temp
            Y.aux[is.na.Y] = 0
            d = crossprod(Y.aux, t)
            T = drop(t) %o% q.ones
            T[is.na.Y] = 0
            t.norm = crossprod(T)               
            d = d / diag(t.norm)
        }else{
            d = crossprod(Y.temp, t) / drop(crossprod(t))
        }

Comments (3)

  1. Log in to comment