結果 : r code for sample variance