15 lines
363 B
Mathematica
15 lines
363 B
Mathematica
>> h = [-8,-9,-3,-1,-6,7];
|
|
>> g = [24,75,71,-34,3,22,-45,23,245,25,52,25,-67,-96,96,31,55,36,29,-43,-7];
|
|
>> f = [-3,-6,-1,8,-6,3,-1,-9,-9,3,-2,5,2,-2,-7,-1];
|
|
>> deconv(g,f)
|
|
|
|
ans =
|
|
|
|
-8.0000 -9.0000 -3.0000 -1.0000 -6.0000 7.0000
|
|
|
|
>> deconv(g,h)
|
|
|
|
ans =
|
|
|
|
-3 -6 -1 8 -6 3 -1 -9 -9 3 -2 5 2 -2 -7 -1
|