Hace poco me ha pasado una cosa curiosa y soy incapaz de arreglara.
Utilizando la función solve
A <- matrix(c(1, 1, 1, 1, 1,
              4, 5, 6, 7, 8,
              0, 0, 0, 1,-1,
              0, 0, 0, 0, 1,
              1, 0, 0, 0, 0
), nrow=5,byrow=T )
b <- c(40+1, 208, 0, 2, 14) # Jugar con los dos utlimos parametros hasta
encontrar la solución
x <- solve(A,b)

> x[1] 14 16  7  2  2


Pero

> x[1] == 14[1] FALSE> x[1][1] 14

Pueden replicar este resultado. ¿Por qué ocurre esto? ¿Es porque es un
objeto s3?

He intentado solucionarlo con
x <- as.integer(x)
Pero tampoco.
La verdad que esto me tiene un poco mosqueado.

Gracias por adealantado.

	[[alternative HTML version deleted]]