Here is a hint of how you might want to do the first part. You might want to study the 'lappy' function
vegList <- lapply(c('bray', ..., 'binomial'), function(.method){ vegdist(x, method=.method) }) clustList <- lapply(vegList, function(.dist){ lapply(c('average', ..., 'centroid'), function(.dist){ hclust(.veg, .dist) }) }) rest left as exercise for the reader. On Tue, Nov 10, 2009 at 2:05 PM, bikemike42 <ml...@tamu.edu> wrote: > > Dear All, > > I wrote a function for cluster analysis to compute cophenetic correlations > between dissimilarity matrices (using the VEGAN library) and cluster > analyses of every possible clustering algorithm (SEE ATTACHED) > http://old.nabble.com/file/p26288610/cor.coef.R cor.coef.R . As it is now, > it is extremely long, and for the future I was hoping to find a more > efficient way of doing this sort of thing. > > To give you an outline of the function, first I create the dissimiarity > matrices using all possible methods in the VEGAN command "vegdist", then > create the clusters using all possible algorithms in "hclust" and the > dissimilarity matrices I crated, then create a table, and in one column, > list all combinations, and in the other, compute and put the cophenetic > correlation. > > Any help would be appreciated! I'm pretty new to writing my own functions > but I see great time-saving potential. > > Thanks! > Mike > -- > View this message in context: > http://old.nabble.com/All-possible-combinations-of-functions-within-a-function-tp26288610p26288610.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > -- Jim Holtman Cincinnati, OH +1 513 646 9390 What is the problem that you are trying to solve? ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.