       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]][] = (1/35)( -3(data[[1,i-3]][]
+data[[1,i+3]][]) +12(data[[1,i-2]][] +data[[1,i+2]][])
+17(data[[1,i-1][] +data[[1,i+1]][]));  i++]
it doen't work

the function Replace[] also don't work
\!\(For[i = 3,
i = \ 9, Replace[
datatemp, \(data[\([1, i]\)]\)[\(\)] -> \(1\/35\) \((\(-3\) \
\((\(data[\([1, i - 2]\)]\)[\(\)] + \(data[\([1, i +
2]\)]\)[\(\)])\) +
12 \((\(data[\([1, i -
1]\)]\)[\(\)] + \(data[\([1, i + 1]\)]\)[\(\)])\)
+
17 \( data[\([1, i]\)]\)[\(\)])\)];
\(i++\)]\)

Then what should I do ?
Thanks.

```

• Prev by Date: Re: Mathematica, Linux and OpenMosix
• Next by Date: webMathematica - does it need the Xvnc password?
• Previous by thread: (lack of) arguments to lists and joins thereof
• Next by thread: Re: Smooth the data in a table, Why this cannot work?