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

victoryldh

源程序：
ClearAll["Global`*"]
; I9 v5 J: t. ]$ b" q4 _. hn = 21
: D7 m1 `+ r4 M% {4 s# oIc1 = 64.9
$ J  ~# E9 `! n+ dIc2 = 67
Ic3 = 64.1
. e8 p7 R. X- T+ @/ `, b( D+ wIc4 = 56.2
$ ~' e* W6 o* E! |. ?! UR1 = 0.328*10^-6
7 @3 Q% A" _- \/ MR2 = 2.101*10^-6
  i, }8 j& k  J# t$ C: VR3 = 0.533*10^-6
# V% H6 w; [. P0 ~5 GR4 = 0.6*10^-6
* k& j4 P; b$ n" K. EVc = 10^-4
3 a; J9 O$ r0 g; GEqual1 = Vc*(I1/Ic1)^n + R1*I1 - V
Equal2 = Vc*(I2/Ic2)^n + R2*I2 - V
, Z$ `# y& K8 |' E6 @. ]  T. R3 jEqual3 = Vc*(I3/Ic3)^n + R3*I3 - V
Equal4 = Vc*(I4/Ic4)^n + R4*I4 - V
Equal5 = I1 + I2 + I3 + I4 - It
4 I- ]+ w% e$ VData = Do[
/ y( ]0 A  }5 C+ R9 S: A  Print[FindRoot[{Equal1 == 0, Equal2 == 0, Equal3 == 0, Equal4 == 0,
/ [1 ?( `( o5 V' g& z. E: F; x4 u, X; J     Equal5 == 0}, {{I1, 0}, {I2, 0}, {I3, 0}, {I4, 0}, {V,
3 H- Q5 ?/ L# r9 B( N# i, T      0}}]], {It, 0, 300}]
- m9 g' G! n3 S! T* D
* G! Y' U7 Q3 n$ {保存的格式如下：
% }( B5 _* y; A* U3 u: b! [$ x 0.0000000e+00   0.0000000e+00   0.0000000e+00   
. ^! O- R  y0 \) a 4.3137523e-01    6.7344634e-02     2.6546168e-01   
" g. [) G; u" {. I. u% b) V

) a' z( N( D- x$ b