Running examples in 'FinePop-Ex.R' failed
The error most likely occurred in:

> ### Name: EBFST
> ### Title: Empirical Bayes estimator of Fst.
> ### Aliases: EBFST
> 
> ### ** Examples
> 
> # Example of GENEPOP file
> data(jsmackerel)
> cat(jsmackerel$MS.genepop, file="JSM_MS_genepop.txt", sep="\n")
> cat(jsmackerel$popname, file="JSM_popname.txt", sep=" ")
> 
> # Data load
> # Prepare your GENEPOP file and population name file in the working directory
> # (Here, these files were provided as "JSM_MS_genepop.txt" and "JSM_popname.txt".)
> popdata <- read.genepop(genepop="JSM_MS_genepop.txt", popname="JSM_popname.txt")
> 
> # Fst estimation
> result.eb <- EBFST(popdata)
Computing global differenciation with ML method... done.
Computing pairwise differenciation with EB method... pop 1:21:31:41:51:61:71:82:32:42:52:62:72:83:43:53:63:73:84:54:64:74:85:65:75:86:76:87:8done.
Estimating variance of differenciation with BS method... done.
!!! FINISH !!!
> ebfst <- result.eb$pairwise$fst
> write.csv(ebfst, "result_EBFST.csv", na="")
> ebfst.d <- as.dist(ebfst)
> print(ebfst.d)
             OS         HM2          BS         HI1         HI2         HAa
HM2 0.003431203                                                            
BS  0.003557524 0.003877993                                                
HI1 0.003002472 0.003870664 0.003613778                                    
HI2 0.003345176 0.003280839 0.003130999 0.003613338                        
HAa 0.009905359 0.008030557 0.009354156 0.010369978 0.008986412            
HAb 0.026933150 0.029577556 0.027514029 0.027870247 0.030261300 0.033794736
HAr 0.006571032 0.005448940 0.005858326 0.006315951 0.005673106 0.009159216
            HAb
HM2            
BS             
HI1            
HI2            
HAa            
HAb            
HAr 0.026358615
> 
> # dendrogram
> ebfst.hc <- hclust(ebfst.d,method="average")
> plot(as.dendrogram(ebfst.hc), xlab="",ylab="",main="", las=1)
> 
> # MDS plot
> mds <- cmdscale(ebfst.d)
> plot(mds, type="n", xlab="",ylab="")
> text(mds[,1],mds[,2], popdata$pop_names)
> 
> # NJ tree
> library(ape)
Error: package or namespace load failed for 'ape' in library.dynam(lib, package, package.lib):
 DLL 'Rcpp' not found: maybe not installed for this architecture?
Execution halted