| 查看: 703 | 回复: 3 | ||
[求助]
傅里叶变换
|
|
如下图的程序语言，怎么傅里叶变换给不出结果呢？ 其中 程序中的f（t）就是一个矩形波，g（t）就是将f（t）延拓 后的函数，见第二张图。 先谢谢啦！  LFGK8G]0X8S[6LR_X`A3S7U.jpg  SG7ZP)_J{~9KLZXTJLVE6N4.jpg |
回复此楼
walk1997
金虫 (著名写手)
- 应助: 1 (幼儿园)
- 金币: 4676.2
- 红花: 22
- 帖子: 1066
- 在线: 798.1小时
- 虫号: 416039
- 注册: 2007-06-29
- 性别: GG
- 专业: 粒子物理学和场论
2楼2012-12-08 18:59:47
xulianjing
银虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 451.4
- 散金: 10
- 红花: 14
- 帖子: 159
- 在线: 65.4小时
- 虫号: 2648773
- 注册: 2013-09-12
- 专业: 光学
3楼2013-10-14 21:52:06
walk1997
金虫 (著名写手)
- 应助: 1 (幼儿园)
- 金币: 4676.2
- 红花: 22
- 帖子: 1066
- 在线: 798.1小时
- 虫号: 416039
- 注册: 2007-06-29
- 性别: GG
- 专业: 粒子物理学和场论
|
傅立叶级数展开直接用内部函数 Clear["Global`*"] f[t_] := HeavisideTheta[t]; a = 1; b = 2*10^-10; FourierSeries[f[t], t, 3, FourierParameters -> {a, b}] FourierCoefficient[f[t], t, n, FourierParameters -> {a, b}] －--------------- 这里的a可能不对 有一个归一化常数 check一下 另外 对于不能解析求的 也可以采用数值的函数 NFourierTransform 和 NFourierSeries |
4楼2013-10-15 08:02:43
5