R/initHfNames.R

initHfNames <-function(n){
n2 <- n*n
hfNames <- array(rep("impossible", n2), dim = c(n,n))

hfNames[col(hfNames)<=row(hfNames)]<-"NULL"


return(hfNames)
}

Try the GUIgems package in your browser

Any scripts or data that you put into this service are public.

GUIgems documentation built on May 1, 2019, 8:19 p.m.