reversing the value of variables

[Yuba Raj]

I have 11 variables named num_pih1 to num_pih11 scored 0 to 8.
I need to reverse the values of variables so that the one scored 0 in original variable becomes 8 in new variable.

gen pih1=.
replace pih1=0 if num_pih1==8
replace pih1=1 if num_pih1==7
replace pih1=2 if num_pih1==6
replace pih1=3 if num_pih1==5
replace pih1=4 if num_pih1==4
replace pih1=5 if num_pih1==3
replace pih1=6 if num_pih1==2
replace pih1=7 if num_pih1==1
replace pih1=8 if num_pih1==0

I tried this code, it works but I was wondering if there is a shorter way to do it for all 11 variables.
Thanks

[Carole J. Wilson]

See: help recode

The following creates new variables new_num_pih1, new_num_pih2... containing the recodes

recode num_pih* (0=8) (1=7) (2=6) (3=5) (4=4) (5=3) (6=2) (7=1) (8=0), prefix(new_)

You can rename the variable to pih1, pih2, etcc with rename (see: help rename group )

rename new_num_* *

[Chris Larkin]

foreach var of varlist list out your eleven variables here{
       recode `var' (8=0) (7=1) (6=2) (5=3) (3=5) (2=6) (1=7) (0=8)
}

Should do the trick

[Yuba Raj]

Perfect, Thank you Carole

[Romalpa Akzo]

forval i=1/11 {
gen pih`i' = 8 - num_pih`i'
}

[Yuba Raj]

Thanks Chris and Romalpa, great to know there are many ways to do this.