Hola Javier,

En Rstudio no  pasa

> 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 )
> A
     [,1] [,2] [,3] [,4] [,5]
[1,]    1    1    1    1    1
[2,]    4    5    6    7    8
[3,]    0    0    0    1   -1
[4,]    0    0    0    0    1
[5,]    1    0    0    0    0
> b <- c(40+1, 208, 0, 2, 14) # Jugar con los dos utlimos parametros hasta
> b
[1]  41 208   0   2  14
> x <- solve(A,b)
> x
[1] 14 16  7  2  2
> x[1]
[1] 14
> x[1]==14
[1] TRUE


Sin embargo, en R2.15.1 si

> 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
> x[1]==14
[1] FALSE
>


Algo curioso

Un saludo


El 9 de noviembre de 2012 15:51, Javier Villacampa González <
javier.villacampa.gonzalez@gmail.com> escribió:

> 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]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>


-- 
Jose Luis

	[[alternative HTML version deleted]]

