ex<-GenerateExample(dimA=22, dimB=22, filling=.5, covariance=.6,
symmetric=TRUE, numOrths=10, correlated=seq(1,18))
pinitial<-InitialAlignment(psize=34, r=ex$r, mode="reciprocal")
lookupNode<-c(-.5,.5,1.5)
nodeParams<-ComputeNodeParameters(dimA=22, dimB=22, ex$r,
pinitial, lookupNode)
Run the code above in your browser using DataLab