On Apr 2, 2015, at 7:06 AM, S Ellison wrote:

>> I am analyzing trend  using Mann-kendall  test for 31 independent sample, 
>> each
>> sample  have 34 years dataset.  I supposed to find Kendall “tau” for each
>> sample. The data is arranged in column wise (I attached  the data).To find
>> Kendall tau, I wrote R script as:
>> ...
>> Anyone can tell me how can I get orderly displayed  “tau” value? 
> 
> Usually, in R, a hypothesis test returns an object, and you can extract an 
> individual element of that object.
> 
> MannKendall seems to be no exception. Looking at the help page, a MannKendall 
> test returns...
> " A list with class Kendall.
> tau   Kendall’s tau statistic
> sl    two-sided p-value
> S     Kendall Score
> D     denominator, tau=S/D
> varS  variance of S"
> 
> To get just tau, say something like MannKendalltau[i]<-MannKendall(y[,i])$tau
> 
> But your code is a bit of a mess....
> MannKendalltau<- numeric(nc) simply makes MannKendalltau a single integer 
> equal to nc; that doesn't look sensible when the next thing you do is treat 
> MannKendalltau as a vector. R's been kind to you and extended MannKendalltau 
> when you tried to add things to later, non-existent, elements, but it clearly 
> wasn't the right thing to do. Look up ?numeric, and then look up ?vector for 
> next time you want to set up an empty vector.
> 
> Second, since MannKendall(y[,i]) ) returns a list object of class Kendall, 
> MannKendalltau[i]<-MannKendall(y[,i]) assigns a whole  object containing 5 
> values to each new element of your MannKendalltau. So your result is a list 
> of lists.
> 
> Finally, you don’t need a loop at all. On a data frame, sapply would work 
> nicely, so (although I've not tested it) something like
> 
> sapply(desta[,2:nc], 2, function(x) ManKendall(x)$tau)

That looks more line an apply call. The second argument to sapply needs to be a 
function or function name.


-- 
David.
> 
> ought to do the whole thing in one shot and package it nicely into a named 
> vector while it's about it.
> 
> S Ellison
> 
> 
> *******************************************************************
> This email and any attachments are confidential. Any u...{{dropped:19}}

______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.

Reply via email to