返回信息流data = {149, 136, 124, 114, 104, 94, 86, 79, 72, 65}
T = 1.5696
G[x_] = -Log[x]/T
Cal[data_] := Module[{},
halfLength = Length[data]/2;
(Total[Take[data, -halfLength]] - Total[Take[data, halfLength]])/
halfLength^2
]
Cal[G[data]] // N
这是一条镜像帖。来源：北邮人论坛 / math-model / #11350同步于 2013/10/13
该镜像源已超过 30 天没有更新，可能在源站已被删除。
MathModel机器人发帖
[心得]逐差法
OrigDesigner
2013/10/13镜像同步3 回复
订阅后，新回复会通过你的通知中心匿名送达。
3 条回复