En el boletín hay un error pues las dos expresiones deberían hacer referencia a la tabla de datos al utilizar esas variables:

> ErrorRateLM = sum(Ordenadores$yhatLM != Ordenadores$tipon) / dim(Ordenadores)[1]

> ErrorRateGLM = sum(Ordenadores$yhatGLM != Ordenadores$tipon) / dim(Ordenadores)[1]