User Tools

Site Tools


en:hier-agglom_rscript

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revision Previous revision
en:hier-agglom_rscript [2019/04/08 09:22]
David Zelený
en:hier-agglom_rscript [2019/04/14 17:47] (current)
David Zelený
Line 26: Line 26:
 plot (as.dendrogram (ward), main = "sqrt (Bray-Curtis distance)\nWard'​s minimum variance method"​) plot (as.dendrogram (ward), main = "sqrt (Bray-Curtis distance)\nWard'​s minimum variance method"​)
 dev.off () dev.off ()
 +
 +# beta flexible - three options
 +library (cluster)
 +library (vegan)
 +data (dune)
 +dune.dist <- vegdist (dune)
 +
 +png ('​classification-flexible-beta.png',​ width = 12, height = 4, units = '​in',​ res = 300)
 +par (mfrow = c(1,3))
 +beta <- -.95
 +beta.flex <- agnes (dune.dist, method = '​flexible',​ par.method = (1-beta)/2)
 +plot (as.dendrogram (beta.flex),​ main = '​Flexible beta (beta = -0.95)\nBray-Curtis distance'​)
 +
 +beta <- -0.25
 +beta.flex <- agnes (dune.dist, method = '​flexible',​ par.method = (1-beta)/2)
 +plot (as.dendrogram (beta.flex),​ main = '​Flexible beta (beta = -0.25)\nBray-Curtis distance'​)
 +
 +beta <- +.95
 +beta.flex <- agnes (dune.dist, method = '​flexible',​ par.method = (1-beta)/2)
 +plot (as.dendrogram (beta.flex),​ main = '​Flexible beta (beta = +0.95)\nBray-Curtis distance'​)
 +
 +dev.off ()
 +
  
  
en/hier-agglom_rscript.txt · Last modified: 2019/04/14 17:47 by David Zelený