Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Line broadening (as a function of energy)' topicStudent Support Forum > General > Archives > "Line broadening (as a function of energy)"

< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic
Author Comment/Response
toen
03/15/12 11:51pm

g'day Dustin,

I have a partial answer for you, but need clarification to go further.

First: Your kernel wasn't normalised. Instead try

GaussKernel2=(Table[PDF[NormalDistribution[0,.001],n],{n,-.005,.005,.0001}]~Normalize~Total)

ListConvolve[GaussKernel2, Subscript[RawSum, sm], {-51, 51}, 0] // ListLinePlot

This seems to work fairly well. Is it what you're after?

(Alternatively you could just change your "GaussKernel/10" to GaussKernel~Normalize~Total )


If you want a specific quantity of "blur" in the energy(x)-axis (e.g. 5 meV), then it will be helpful to match the convolution increments to the energy increments. I.e.

With[
{inc=(CBsuSM[[-1,1]]-CBsuSM[[2,1]])/(Length[CBsuSM[[2;;,1]]]-1)},
GaussKernel3=(Table[PDF[NormalDistribution[0,0.0005],n],{n,-50 inc,50 inc,inc}]~Normalize~Total)];

ListConvolve[GaussKernel3,Subscript[RawSum, sm],{-51,51},0]//ListLinePlot


>>>>

If this isn't what you're after, then for me to help you I need to understand more clearly why you want to do a 2-dimensional convolution. I don't see the relevance to the problem that you're asking.

cheers,
toen

URL: ,

Subject (listing for 'Line broadening (as a function of energy)')
Author Date Posted
Line broadening (as a function of energy) Dustin 03/14/12 10:52am
Re: Line broadening (as a function of energy) toen 03/15/12 11:51pm
Re: Line broadening (as a function of energy) Dustin 04/09/12 3:28pm
< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic