calculate bias and variance in r