# Polar image plot

I would like to perform the polar plot of an electron microscope contrast transfer function, into a black and white image.

I have used the equation

t = -Sin[π/2 #^4 + π #^2 ] &;

Plot[t[x], {x, 0, 5}]


to generate the sample function.

However, I was unable to convert this image into the contrast transfer function plot.

In short, what function would convert the plot

into the image

• Take a look at DensityPlot.
– Kuba
Jan 3 '15 at 11:37

a = 1.5;

a = 5;