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

victoryldh

源程序：
ClearAll["Global`*"]
n = 21
6 c$ b. |6 D, a% i7 VIc1 = 64.9
Ic2 = 67
Ic3 = 64.1
7 W( j4 M8 t. I8 _1 u+ EIc4 = 56.2
( l5 W/ R/ U* L* q$ J) r8 iR1 = 0.328*10^-6
8 J3 ]9 V! U0 a- ]6 ?R2 = 2.101*10^-6
  E2 ?% ^  P  L8 ?R3 = 0.533*10^-6
R4 = 0.6*10^-6
Vc = 10^-4
5 @7 j, q% L. p+ Z3 _" _Equal1 = Vc*(I1/Ic1)^n + R1*I1 - V
5 Q1 B$ A" J, TEqual2 = Vc*(I2/Ic2)^n + R2*I2 - V
4 O$ X5 H7 N  x' t, E5 \Equal3 = Vc*(I3/Ic3)^n + R3*I3 - V
Equal4 = Vc*(I4/Ic4)^n + R4*I4 - V
2 K9 \$ u5 p# u& P6 ~Equal5 = I1 + I2 + I3 + I4 - It
' L* M2 p# n) s% i. \  G8 aData = Do[
3 q- I1 }- |% y  Print[FindRoot[{Equal1 == 0, Equal2 == 0, Equal3 == 0, Equal4 == 0,
     Equal5 == 0}, {{I1, 0}, {I2, 0}, {I3, 0}, {I4, 0}, {V,
# ^7 B. j8 E) s. b( z; V      0}}]], {It, 0, 300}]
7 a* Z$ d! i8 X: o4 }+ J
! ~3 X% e! h5 t7 ]1 ^6 b- y保存的格式如下：
0.0000000e+00   0.0000000e+00   0.0000000e+00   
4.3137523e-01    6.7344634e-02     2.6546168e-01   


2 X2 B1 c! C; R* f5 F) ~9 i# n
. a0 V/ `' p  h1 Z# @