Iy = OpenWrite[ "AK12.txt", FormatType -> OutputForm ] ;
Table[ \[Theta] = Et[[1, n]] ;
k = Et[[2, n]] ; \[Xi] = Et[[3, n]] ;
Write[ Iy , N[ \[Theta], 50] , " ", N[ k, 50] ,
" ", N[ \[Xi], 50] ],
{n, 1, N1*16} ] ;
Close[Iy];
我会出数据是用这样写
但是其中一项的值有时候太小
会变成用科学符号表示 如 1.258*10^-6
可是会出数据时排序会乱掉
想问能不能不要变成科学符号表示 直接用0.0000001258