一个含有变换列表的列表，怎么提取里边的数据？

Question

Clear["Global`*"]
W[x_] := x^(-4) + 2 x^2 - 3 + (x^(-4) - 1)^2
f[x_, y_, z_] := 
 1/2 ((1/((1 + z)^3*x^3) - x^(-3) + 1)^(-1/3) - 1)*x^3*y^2
g[x_, t_] := -1/3 t (x^3 - 1)
xlist = Range[1, 1.5, 0.1];
Table[NSolve[
  f[x, y, 0.1] + g[x, 2] + 
   NIntegrate[\[Lambda]^2*D[W[t], t]/(1 - t^3), {\[Lambda], 1, 
     x}, {t, ((0.1 + 1)^3*(\[Lambda]^3 - 1) + 1)^(1/3), \[Lambda]}], 
  y], {x, xlist}]

结果为一个列表：

{{{y -> 0.}, {y -> 0.}}, {{y -> -2.05048}, {y -> 
    2.05048}}, {{y -> -3.03445}, {y -> 
    3.03445}}, {{y -> -3.91118}, {y -> 
    3.91118}}, {{y -> -4.75495}, {y -> 
    4.75495}}, {{y -> -5.58941}, {y -> 5.58941}}}

我想让结果里的y1的值提取出来组成一个列表，y2的值提取出来组成另一个列表，请问该怎么处理？

对于这种数值解方程得出的结果该怎么提取数据？

 

Comments

y1 = y /. list[[All, 1]]，不晓得你是不是这个意思

---

能把规则去掉吗，我只想要类似这样的数据
y1={0., 0.0209541, 0.0624121, 0.111464, 0.164617, 0.220958}

---

可以了，刚理解错了。。。
谢谢！