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

victoryldh

源程序：
ClearAll["Global`*"]
" L) F+ k- t2 I% s. En = 21
Ic1 = 64.9
Ic2 = 67
Ic3 = 64.1
Ic4 = 56.2
! ?4 q4 Q' b, e$ T. m- |R1 = 0.328*10^-6
R2 = 2.101*10^-6
# J" P! V$ M* @) L) h& s5 MR3 = 0.533*10^-6
R4 = 0.6*10^-6
$ r1 q1 L  y( h2 o+ }Vc = 10^-4
; o) {1 R$ N' t$ @0 _Equal1 = Vc*(I1/Ic1)^n + R1*I1 - V
Equal2 = Vc*(I2/Ic2)^n + R2*I2 - V
Equal3 = Vc*(I3/Ic3)^n + R3*I3 - V
Equal4 = Vc*(I4/Ic4)^n + R4*I4 - V
6 |  _3 g" ?& OEqual5 = I1 + I2 + I3 + I4 - It
  w; ^  ~! c4 D3 ]Data = Do[
) ]1 M, D) J) P( W  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}]
& m# b$ f7 N7 z) V% _: @7 ^
保存的格式如下：
0.0000000e+00   0.0000000e+00   0.0000000e+00   
( P; ^5 j7 V9 B  ?( i( x2 } 4.3137523e-01    6.7344634e-02     2.6546168e-01   

. ?) G+ O- D5 ~1 @, P. q
: s0 J( l0 d% {+ d8 J* p
. ]7 G( ~! o* \