我想知道如何在mathematica中找到输出中的特定点

时间:2016-07-08 09:10:32

标签: mathematica-frontend

以下是我的代码。

as = Flatten[Import["e:\\matlab\\piturn\\Nor_bms\\as.mat"]];
da = AccountingForm[
Flatten[Import["e:\\matlab\\piturn\\Nor_bms\\da.mat"]]];
For[i = 1, i < 2304, i++, ghdparam = Table[0, {i, 1, 909}, {j, 1, 5}];
For[j = 1, j < 910, j++, 
path = "e:\\mathematica\\abs_5s\\" <> 
StringTake[ToString[AccountingForm[da[[1, j]]]], 8] <> "\\" <> 
as[[i]] <> ".mat";
If[FileExistsQ[path], abs = Flatten[Import[path], 1], Continue[]];
abms = abs[[All, 1]] - abs[[All, 2]];
Print["i=", i];
ghdparam[[j]] = 
FindDistributionParameters[abms, 
HyperbolicDistribution[\[Lambda], \[Alpha], \[Beta], \[Delta], \
\[Mu]], ParameterEstimator -> "MethodOfMoments"];Print["j="];
 Print[j];
 Export["e:\\mathematica\\continuous\\" <> as[[i]] <> ".mat", 
 ghdparam];
 Clear[path, abs, abms]]]

enter image description here 此图像是mathematica中我的代码输出的一部分。 “i = 1”表示输出循环中的第一个循环,“j = 2”表示内循环中的第二个循环。现在我想找到包含错误信息的点。例如,在该图中,仅当i = 1且j = 5时,没有错误信息。然后我想获得有错误的j点列表,就像{1,2,3,4}一样。对于该程序将循环许多次,我想通过代码执行此操作。愿有人帮助我!谢谢!

0 个答案:

没有答案