R help - Apr 2007 - Hi

Please add me to mailing list.
 
regards
Astha



************************************** See what's free at
http://www.aol.com.

	[[alternative HTML version deleted]]

--- Asthakp at aol.com wrote:
> Please add me to mailing list.
>  
> regards
> Astha
I think you need to go here to subscribe
https://stat.ethz.ch/mailman/listinfo/r-help

hi,
I have a problem to use union function because one of the elements is a
character and the others are numeric
> for(j in 1:length(I)) {
+ C1 <- levels(factor(subset(donParEssai, Id_Essai == 1006961 & Id_Cara
== I[j], select = Date_O)[,1]))
+ C2 <- as.numeric(levels(factor(subset(donParEssai, Id_Essai == 1006961
& Id_Cara == I[j], select = Stade_O)[,1])))
+ C3 <- length(as.numeric(levels(factor(subset(donParEssai, Id_Essai ==
1006961 & Id_Cara == I[j], select = Id_Geno)[,1]))))
+ C4 <- length(levels(factor(subset(donParEssai, Id_Essai == 1006961 &
Id_Cara == I[j], select = Id_Rep)[,1])))
+ C5 <- mean(as.numeric(as.character(subset(donParEssai, Id_Essai == 1006961
& Id_Cara == I[j], select = Val_O)[,1])))
+ C6 <- range(as.numeric(as.character(subset(donParEssai, Id_Essai == 1006961
& Id_Cara == I[j], select = Val_O)[,1])))
+ C7 <- sd(as.numeric(as.character(subset(donParEssai, Id_Essai == 1006961
& Id_Cara == I[j], select = Val_O)[,1])))
+ RecapCara[j,] <-
union(C1,union(C2,union(C3,union(C4,union(C5,union(C6,C7))))))
+ }
Erreur dans RecapCara[j, ] <- union(C1, union(C2, union(C3, union(C4,
union(C5,  :
        le nombre d'objets à remplacer n'est pas multiple de la taille
du remplacement
> print(RecapCara)
     [,1] [,2] [,3]     [,4] [,5] [,6]     [,7]
[1,]   NA   21    3  7.66129  5.2 17.1 2.318801
[2,]   NA   21    3 50.56774 47.3 53.9 1.469222
> C1
[1] "29/08/2005"

I can't paste C1 with others values how could I do to paste C1 with others
please?


      
___________________________________________________________________________





	[[alternative HTML version deleted]]

hi,
I have this error 
> tr <- sample(1:50, 25)
> train <- rbind(iris3[tr,,1], iris3[tr,,2], iris3[tr,,3])
> test <- rbind(iris3[-tr,,1], iris3[-tr,,2], iris3[-tr,,3])
> cl <- factor(c(rep("s",25), rep("c",25),
rep("v",25)))
> z <- lda(train, cl)
Erreur : impossible de trouver la fonction "lda"

I don't understand why R doesn't recognize the lda function,
can you help me please?


      
___________________________________________________________________________





	[[alternative HTML version deleted]]