R set , gammal,