Smooth the data in a table, Why this cannot work?
- To: mathgroup at smc.vnet.net
- Subject: [mg62513] Smooth the data in a table, Why this cannot work?
- From: "simon yang" <yanshanguke at 163.com>
- Date: Sat, 26 Nov 2005 02:47:14 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
Hello, every one. I meet a problem when I smooth the data in a table:
280.00,.000
282.00,.002
284.00,.002
286.00,.000
288.00,.000
290.00,.002
292.00,.003
294.00,.003
296.00,.003
298.00,.011
300.00,.031
302.00,.076
The method I used is:
For[i=3,i<=9,data[[1,i]][[2]] = (1/35)( -3(data[[1,i-3]][[2]]
+data[[1,i+3]][[2]]) +12(data[[1,i-2]][[2]] +data[[1,i+2]][[2]])
+17(data[[1,i-1][[2]] +data[[1,i+1]][[2]])); i++]
it doen't work
the function Replace[] also don't work
\!\(For[i = 3,
i = \ 9, Replace[
datatemp, \(data[\([1, i]\)]\)[\([2]\)] -> \(1\/35\) \((\(-3\) \
\((\(data[\([1, i - 2]\)]\)[\([2]\)] + \(data[\([1, i +
2]\)]\)[\([2]\)])\) +
12 \((\(data[\([1, i -
1]\)]\)[\([2]\)] + \(data[\([1, i + 1]\)]\)[\([2]\)])\)
+
17 \( data[\([1, i]\)]\)[\([2]\)])\)];
\(i++\)]\)
Then what should I do ?
Thanks.