这个5元方程循环求解后的结果怎么保存txt文本（可以粘贴入origin直接画图），急求

victoryldh

源程序：
' C2 W. C* k% @* gClearAll["Global`*"]
9 p: [. I2 K2 }7 D/ Wn = 21
$ P0 k0 a6 d! VIc1 = 64.9
5 c0 g# m& q' J' l( F( Z. W6 RIc2 = 67
+ G# ]4 I' x2 A2 lIc3 = 64.1
, g; D3 r$ U% D+ O0 |Ic4 = 56.2
R1 = 0.328*10^-6
) ?- D" E1 W+ _) {. ~# Y! iR2 = 2.101*10^-6
' i0 G9 x) C( W1 mR3 = 0.533*10^-6
R4 = 0.6*10^-6
Vc = 10^-4
Equal1 = Vc*(I1/Ic1)^n + R1*I1 - V
Equal2 = Vc*(I2/Ic2)^n + R2*I2 - V
7 W0 N$ b% x: P: |+ o9 `: eEqual3 = Vc*(I3/Ic3)^n + R3*I3 - V
Equal4 = Vc*(I4/Ic4)^n + R4*I4 - V
! e+ ^" i, R. v7 n) t9 yEqual5 = I1 + I2 + I3 + I4 - It
Data = Do[
  Print[FindRoot[{Equal1 == 0, Equal2 == 0, Equal3 == 0, Equal4 == 0,
     Equal5 == 0}, {{I1, 0}, {I2, 0}, {I3, 0}, {I4, 0}, {V,
      0}}]], {It, 0, 300}]
0 a; U0 d( F. ]
保存的格式如下：
0.0000000e+00   0.0000000e+00   0.0000000e+00   
4.3137523e-01    6.7344634e-02     2.6546168e-01   

! i, T& m3 [4 O

! G, i- b: {" Y/ r. _+ ~