# NOT RUN {
data(F2data)
readraw<-Readdata(file=F2data,fileFormat="GCIM",
method="GCIM",filecov=NULL,MCIMmap=NULL,
MultiEnv=FALSE)
DoResult<-Dodata(fileFormat="GCIM",Population="F2",
method="GCIM",Model="Random",readraw,MultiEnv=FALSE)
wf<-WenF(pheRaw=DoResult$pheRaw,
genRaw=DoResult$genRaw,mapRaw1=DoResult$mapRaw1,
yygg1=DoResult$yygg1,cov_en=DoResult$cov_en,
WalkSpeed=1,CriLOD=2.5,dir=tempdir())
# }
Run the code above in your browser using DataLab