Create Gender_back2back.R