R/LoadOldPhi0.R

In MathBilibili/Stochastic-approximation-cut-algorithm: Stochastic Approximation Cut Algorithm

Defines functions LoadOldPhi0

Documented in LoadOldPhi0

LoadOldPhi0<-function(filename="PhiC.csv"){
  ncol.print <- function(dat) matrix(as.matrix(dat),ncol=ncol(dat),dimnames=NULL)
  PhiC<-ncol.print(as.matrix(fread(filename,head=F)))
  return(PhiC)
}