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

victoryldh

源程序：
6 N. u$ Q: h+ v' q3 {) o( SClearAll["Global`*"]
n = 21
/ U7 E% ?$ J0 m4 @3 ^Ic1 = 64.9
- ^% p& {. G0 KIc2 = 67
Ic3 = 64.1
Ic4 = 56.2
! l3 j  v# m6 NR1 = 0.328*10^-6
R2 = 2.101*10^-6
; _% y- h3 T6 A) S# D' \( |8 jR3 = 0.533*10^-6
  _1 i' h! b3 J/ lR4 = 0.6*10^-6
! G4 o$ v) w2 e1 G. g0 RVc = 10^-4
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
0 N! O+ J1 X% e6 n" P! JEqual5 = 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}]

7 o8 `6 u6 P4 `* g4 {2 w保存的格式如下：
4 o$ ?4 @$ S; Q4 H7 W6 q 0.0000000e+00   0.0000000e+00   0.0000000e+00   
4.3137523e-01    6.7344634e-02     2.6546168e-01   

8 O* }* o& F% z2 G0 k' u8 @

# x- ?! ]: o0 g) c7 d