Mathematica: Deshacerse de la "x - >" en los resultados de FindInstance
-
06-07-2019 - |
Pregunta
Supongamos que tengo los siguientes resultados:
a=FindInstance[2*b^2 + b^3 == b^4 + t && t < 10 && t > -1, {b, t},
Integers, 20]
{{b -> -1, t -> 0}, {b -> 0, t -> 0}, {b -> 1, t -> 2}, {b -> 2,
t -> 0}}
¿Cómo puedo deshacerme de " b- > " y solo obtener el conjunto de respuestas b? Puedo llegar a la mitad con:
a[[All,1]]
{b -> -1, b -> 0, b -> 1, b -> 2}
pero ¿cómo puedo llegar a:
{-1, 0, 1, 2}
Gracias
Solución
Puede que me falte algo de la respuesta de Dreeves, pero la forma en que siempre creí que lo hacías fue simplemente escribiendo:
b /. a
Hay un ejemplo de esto en los "Ejemplos básicos". sección de la documentación para la función Solve
, que usa el mismo estilo de salida.
Otros consejos
Aunque la respuesta de Will es la forma canónica de hacerlo, proporcionaré algunas alternativas solo por diversión.
In[37]:= ans={{b -> -1, t -> 0},{b -> 0, t -> 0},{b -> 1, t -> 2},{b -> 2, t -> 0}};
In[38]:= Cases[ans, (b -> a_) :> a, Infinity]
Out[38]= {-1, 0, 1, 2}
In[39]:= ans[[All, 1]][[All, 2]]
Out[39]= {-1, 0, 1, 2}
In[40]:= ans /. {b -> a_, _} :> a
Out[40]= {-1, 0, 1, 2}
In[41]:= (ans /. Rule -> List)[[All, 1, 2]]
Out[41]= {-1, 0, 1, 2}
Licenciado bajo: CC-BY-SA con atribución
No afiliado a StackOverflow