Calculating standard deviation arithmetically and with R