# NOT RUN {
data("example.data")
comm=example.data$comm
tree=example.data$tree
# since pdist.big need to save output to a certain folder,
# the following code is set as 'not test'.
# but you may test the code on your computer
# after change the folder path for 'save.wd'.
# }
# NOT RUN {
wd0=getwd()
nworker=2 # parallel computing thread number
rand.time=5 # usually use 1000 for real data.
# for a small dataset, phylogenetic distance matrix can be directly used.
pd=example.data$pd
qp=qpen(comm=comm, pd=pd,
rand.time=rand.time,nworker=nworker)
# for a big dataset, pdist.big may be used
save.wd=paste0(tempdir(),"/pdbig.qpen")
# please change to the folder you want to save the pd.big output.
pd.big=pdist.big(tree = tree, wd=save.wd, nworker = nworker)
qp2=qpen(comm=comm, pd=pd.big$pd.file, pd.big.wd=pd.big$pd.wd,
pd.big.spname=pd.big$tip.label, tree=tree,
rand.time=rand.time, nworker=nworker)
setwd(wd0)
# }
Run the code above in your browser using DataLab