R/clean.warm.start.R

In softImpute: Matrix Completion via Iterative Soft-Thresholded SVD

Defines functions clean.warm.start

Documented in clean.warm.start

clean.warm.start=function(a){
  if(is.null(a))return(NULL)
  d=a$d
  if(is.null(d))return(NULL)
  if(any(d>0)){
    if(length(d)==1){
      a$u=matrix(a$u,ncol=1)
      a$v=matrix(a$v,ncol=1)
    }
    a
  }
  else NULL
}

            

Try the softImpute package in your browser