added touch to set R