Re: [R] All possible combinations of functions within a function
Thank you Baptiste and Jim- I look forward to trying these ideas out when I have a chance. Mike baptiste auguie wrote: Hi, >From what I understand of your code, you might find the following construct useful, funs <- c("mean", "sum", "sd", "diff") x <- 1:10 lapply(funs, do.call, args=list(x)) and then working with lists rather than naming every object individually. You might find mapply useful too when you have to pass several parameters. HTH, baptiste 2009/11/10 bikemike42 : 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. -- Michael L. Treglia Graduate Student Wildlife and Fisheries Sciences Texas A&M University Lab: (979)862-7245 Cell: (917)841-5603 ml...@tamu.edu http://people.tamu.edu/~mlt35 __ 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.
Re: [R] All possible combinations of functions within a function
Hi, >From what I understand of your code, you might find the following construct useful, funs <- c("mean", "sum", "sd", "diff") x <- 1:10 lapply(funs, do.call, args=list(x)) and then working with lists rather than naming every object individually. You might find mapply useful too when you have to pass several parameters. HTH, baptiste 2009/11/10 bikemike42 : > > 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. > __ 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.
Re: [R] All possible combinations of functions within a function
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 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.
[R] All possible combinations of functions within a function
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.