Hi chen,
avoid naming the function with specific expressions (:,;.....) and try
this code as follow
Scripranksum<- function(a){
g1<- c(1, 2, 3)
g2<- c(4, 5, 6, 7, 8, 9, 10, 11, 12)
c<- wilcox.test(a[g1], a[g2])
return (c$p.value)
}
Best
Mohamed
Le 17/02/11 08:15, Mr rong chen a écrit :
> Scrip:ranksum<- function(a){
> g1<- c(1, 2, 3)
> g2<- c(4, 5, 6, 7, 8, 9, 10, 11, 12)
> c<- wilcox.test(a[g1], a[g2])
> return c$p.value
> }
--
####################################
Mohamed Lajnef,IE INSERM U955 eq 15#
Pôle de Psychiatrie #
Hôpital CHENEVIER #
40, rue Mesly #
94010 CRETEIL Cedex FRANCE #
mohamed.laj...@inserm.fr #
tel : 01 49 81 31 31 (poste 18467) #
Sec : 01 49 81 32 90 #
fax : 01 49 81 30 99 #
####################################
[[alternative HTML version deleted]]
______________________________________________
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.
