R Code For Standard Deviation