> require(MASS) > out <- with(weib.test.too, tapply(wind_speed, site, function(x) fitdistr(x, > 'weibull'))) > estimates <- t(sapply(out, "[[", 1)) > SDs <- t(sapply(out, "[[", 2)) > estimates > SDs > > HTH, > Jorge
That'll do nicely and is much more elegant than my current method. I was sure there would be some fancy one liner from plyr though! Thanks a bunch, Justin ______________________________________________ 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.
