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

victoryldh

源程序：
ClearAll["Global`*"]
! ~9 j6 w9 H8 l& c4 W# i# O( e6 C* tn = 21
: F( r( o8 X& J& t' l  q0 e3 QIc1 = 64.9
0 O3 j% }. a5 x/ Q, b7 V; y; TIc2 = 67
Ic3 = 64.1
8 T/ w8 n5 R3 [7 H/ M% i6 e( IIc4 = 56.2
; I! F; q! R7 q6 ER1 = 0.328*10^-6
# U- k. d$ c' @4 rR2 = 2.101*10^-6
0 p$ S. ?5 p! [+ Y* `% ^R3 = 0.533*10^-6
R4 = 0.6*10^-6
Vc = 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
* V+ |3 [9 Q! G# r: PEqual4 = Vc*(I4/Ic4)^n + R4*I4 - V
) @2 ~: o4 X% D- }) \! b  HEqual5 = I1 + I2 + I3 + I4 - It
$ y) D0 g5 F4 \2 z+ W( A( |2 dData = Do[
( K3 X& h' Z  j5 u+ s. {( D  Print[FindRoot[{Equal1 == 0, Equal2 == 0, Equal3 == 0, Equal4 == 0,
( Q! P1 P7 d0 z$ ^5 K( _     Equal5 == 0}, {{I1, 0}, {I2, 0}, {I3, 0}, {I4, 0}, {V,
      0}}]], {It, 0, 300}]

保存的格式如下：
0.0000000e+00   0.0000000e+00   0.0000000e+00   
5 Q9 @  c3 ?- L; R 4.3137523e-01    6.7344634e-02     2.6546168e-01