我为什么会收到错误：Set :: write：Null w中的标记时间受保护

Question

大家好，这是我第一次发布，希望我做对。

我正在尝试在mathematica中运行一些代码：

VtanList = {};

Do[


 For[j = 1, j <= Length[file], j++,

     test = {data[[i, j]]}[[1, 2]] - {data[[i, j + 1]]}[[1, 2]];
     If[test >= 0,
      peak = j + 5;
      j = Length[file] + 10;
      ]
     ]

    w = Take[data[[i]], {1, peak}];


     , {i, Length[file]/256}]

数据列表的样子：

data = {{1,2},{3,2},{1,6},{2,4}}

当我收到错误消息时：

Tag Times in Null w is Protected.

我尝试退出内核，这似乎不是我所读到的经典A + B = C问题。

我真的可以使用您的帮助，谢谢！！！

Answer 1

在For[..]之后添加分号

没有它，Mathematica认为For[..]和w = ..是一个连续表达式的一部分，显然，将for循环与赋值运算相乘没有任何意义。