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

victoryldh

源程序：
; N% K0 x2 F! Y4 @# X8 z0 KClearAll["Global`*"]
n = 21
Ic1 = 64.9
Ic2 = 67
* d5 ~9 L- |0 T& Y' e. Q5 }Ic3 = 64.1
8 z* Y$ C5 w8 P! vIc4 = 56.2
* Y/ D( \: I- a% _! LR1 = 0.328*10^-6
; v( z3 R+ b4 eR2 = 2.101*10^-6
; ^2 _8 m4 q0 D& @% I7 }R3 = 0.533*10^-6
R4 = 0.6*10^-6
6 b- U5 w0 B, r, \% sVc = 10^-4
6 o2 S, H: ]/ e6 j4 @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
Equal5 = I1 + I2 + I3 + I4 - It
! L( Q2 _. j4 _( e. DData = Do[
  Print[FindRoot[{Equal1 == 0, Equal2 == 0, Equal3 == 0, Equal4 == 0,
     Equal5 == 0}, {{I1, 0}, {I2, 0}, {I3, 0}, {I4, 0}, {V,
! o& a! a' M0 {  P4 H: R3 `      0}}]], {It, 0, 300}]

' t' U0 B' q0 N/ ^3 {保存的格式如下：
8 [3 P2 g  x5 {" o$ c& E3 M 0.0000000e+00   0.0000000e+00   0.0000000e+00   
4.3137523e-01    6.7344634e-02     2.6546168e-01   
' u. F! f, q8 V% t2 e


  x" M4 S* r6 X0 Z* F