Re: [R] vectors with equal values

Hi, Isn't that answered already? vec2<-c(2,2,2,2,2,2,2)   if(length(unique(vec2))==1) "x" else  "yyy" #[1] "x" vec2<-c(22,22,22,22,23,22,22)   if(length(unique(vec2))==1) "x" else  "yyy" #[1] "yyy"  vec2<-c(22,22,22,22,22,22,22)   if(length(uniqu

Re: [R] vectors with equal values

Hi, Try:  vec1<-c(1,1,1,1,1,1,1,1,1) if(all(vec1==1)) "x" else  "yyy" #[1] "x"  vec2<-c(rep(1,4),2)  if(all(vec2==1)) "x" else  "yyy" #[1] "yyy" #or if(length(unique(vec1))==1) "x" else  "yyy" #[1] "x"   if(length(unique(vec2)