Re: Re: 2D Convolution
- To: mathgroup at smc.vnet.net
- Subject: [mg76236] Re: [mg76199] Re: 2D Convolution
- From: Murray Eisenberg <murray at math.umass.edu>
- Date: Fri, 18 May 2007 06:13:26 -0400 (EDT)
- Organization: Mathematics & Statistics, Univ. of Mass./Amherst
- References: <f29389$m7p$1@smc.vnet.net> <200705171013.GAA01500@smc.vnet.net>
- Reply-to: murray at math.umass.edu
Of course you can copy without getting gibberish: Use Edit > Copy As >
Plain Text (Windows shortcut Ctrl-Shift-C).
CKWong wrote:
> I've just learned the hard way that you cannot copy the contents of a
> Mathematica notebook to a posting to this group. My last 2 postings
> had thus become gibberish. Many apologies.
>
> In the off-chance that you are still interested, here is my version of
> the Convolve function:
>
> Convolve[ f_, g_, x_?NumberQ, y_?NumberQ] := NIntegrate[ f[xp,yp] *
> g[x-xp,y-yp] , {xp,-Infinity,Infinity}, {yp,-Infinity,Infinity} ]
>
> Sample usage:
> Convolve[SHole, Gaussian2D, 0, 0]
>
> Plot3D[Convolve[SHole, Gaussian2D, x, y] // Evaluate, {x, -4
> BeamRadius, 4
> BeamRadius}, {y, -4 BeamRadius, 4 BeamRadius}, PlotRange -> All]
>
>
>
>
>
--
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305
- References:
- Re: 2D Convolution
- From: CKWong <CKWong.P@gmail.com>
- Re: 2D Convolution