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

victoryldh

源程序：
ClearAll["Global`*"]
  Z2 ~( F; M! Q( z5 kn = 21
( ]3 b( o( _5 u0 t, r3 HIc1 = 64.9
7 {! V4 M( u' C& iIc2 = 67
; e. a; ^, d% }  nIc3 = 64.1
- k! G  a5 P# ?' h0 mIc4 = 56.2
R1 = 0.328*10^-6
R2 = 2.101*10^-6
R3 = 0.533*10^-6
  W! i  t2 y7 Y. a% S% v1 {( HR4 = 0.6*10^-6
Vc = 10^-4
Equal1 = Vc*(I1/Ic1)^n + R1*I1 - V
$ Y# S& q8 x5 v: Q3 F; yEqual2 = Vc*(I2/Ic2)^n + R2*I2 - V
/ j: m- v2 e5 l% d* MEqual3 = Vc*(I3/Ic3)^n + R3*I3 - V
Equal4 = Vc*(I4/Ic4)^n + R4*I4 - V
) H' Z8 ^# v' f6 S) l2 PEqual5 = I1 + I2 + I3 + I4 - It
Data = Do[
* U  M, g) y( c/ I7 E" a; G  ^  Print[FindRoot[{Equal1 == 0, Equal2 == 0, Equal3 == 0, Equal4 == 0,
" O6 k( ^+ M1 A$ Q7 g     Equal5 == 0}, {{I1, 0}, {I2, 0}, {I3, 0}, {I4, 0}, {V,
* j! O  y: x- o% @2 ^% l' |      0}}]], {It, 0, 300}]
' G9 j% d1 b: m+ s3 z
保存的格式如下：
7 m* P; T9 P6 v4 a) ] 0.0000000e+00   0.0000000e+00   0.0000000e+00   
4.3137523e-01    6.7344634e-02     2.6546168e-01   
/ L1 ^5 h( j7 l/ ^$ v/ E
( V. ]/ W  I) c: |