zselect: Xay dung bien so tu bien so cu

Usage Arguments Author(s) Examples

View source: R/zselect.r

Usage

1
zselect(varX, levelx, offset = 0)

Arguments

varX
levelx
offset

Author(s)

Do Van Dung

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
## Ta.o rac ca'c bie^'n coquankhac0, coquankhac1,coquankhac2,coquankhac3
## Label cu?a ca'c bie^'n na`y cu~ng gio^'ng nhu+ label cu?a bie^'n coquankhac
## 
## for (i in 0:3) {
## varName<-"coquankhac"
## varName.i<-paste(varName,i,sep="")
## data1[,varName.i]<-zselect(data1[,varName],i,offset=1)
## label(data1[,varName.i])<-label(data1[,varName])
## }
## 
##==================================================
## Ta.o ra bie^'n coquankhac1 tu+` bie^'n co+ quan kha'c
## bie^'n na`y co' gia' tri la` label cu?a gia' tri. 1 cu?a bie^'n coquankhac ne^'u bie^'n coquankhac co' chu+'a gia' tri. 1 
## data1$coquankhac1<-zselect(data1$coquankhac,1,offset=1)
## 
## zselect<-function(varX,levelx,offset=0){
## x<-as.numeric(varX)==(levelx+offset)
## x<-x | grepl(levelx,as.character(varX))
## labelx<-levels(varX)[levelx+offset]
## x<-factor(x,levels=c(F,T),labels=c("kho^ng",labelx))
## }

gvdovandzung/thongke documentation built on May 23, 2020, 12:35 a.m.