|
] :=
ListPlot[Abs[fld], PlotJoined -> True];
Out[10] :=
이제는 이렇게 노이즈가 제거된 데이터를 InverseFourier라는 함수를 사용해서 역퓨리에 변환시킨다.(In[11])
In[11] :=
infld = InverseFourier[fld];
이렇게 역변환된 데이터를 그래프로 나타내보면 In[12]와 같은
|
|
|
Approach, Prentice-Hall, Englewood Cliffs, N. J., 1992
9. S. Wolfram, Mathematica : A System for Doing Mathematics by Computer, Addison-Wesley, 1991
10. R.D.Skeel, J.B.Keiper, Elementary Numerical Computing with Mathematica, McGraw-Hill, Inc. 1996 1. 서론
2. 고정점 반복법
3. Mathematica
|
|
메뉴펼치기
