-1
$\begingroup$

The person before me created a system to create a x,y plot of ellipses according to certain data. She was able to create a list of these plots, but somehow, the code became unusable and I can't contact her. I won't give the full code since it's quite long with a lot of math involved, but I can give the error code and hopefully you can help me with that.

I am not very familiar with Mathematica since I generally so much with modelling or graph-making, so it is likely that there is a simple mistake I failed to consider or I couldn't find.

Here is the code for the field

Efield2 = 
  ParallelTable[
   Efieldxpol[x, y, z], {x, -xrange, xrange, xstep}, {y, -yrange, 
    yrange, ystep}, {z, -zrange, zrange, zstep}];

The Efieldxpol

Efieldxpol[x_, y_, z_] := 
I k f/2 Sqrt[n1/n2] E0 Exp[-I k f] With[{rho = Abs[x + I y], phi = Arg[x + I y]}, 
 {I00[rho, z, ArcSin[NA/n2]] + I02[rho, z, ArcSin[NA/n2]] Cos[2 phi], 
 I02[rho, z, ArcSin[NA/n2]] Sin[2 phi], -2 I I01[rho, z, ArcSin[NA/n2]] Cos[phi]}];

Where each IXX are a set of integrals which I have checked are mathematically correct

and here is the code for the plot

PlotEllipses2D[Efield2[[All, All, 1, 1 ;; 2]], 2]
(*The first "All" is corresponds to the x axis, the second to the y axis*)

This gives the following error: enter image description here However when I give the following information

PlotEllipses2D[Efield2[[1, 1, 1, 1 ;; 2]], 2]

enter image description here

I can enter each coordinate individually and it will give me the correct information for that coordinate, but I can't figure out how to associate the calculation of every coordinate with its equivalent x/y value.

If you need the PlotEllipses2D code, I can give it here as well.

Thank you again for any help you could give.

$\endgroup$
  • 2
    $\begingroup$ the first bunch of error messages you get are related to Norm but there's nothing in the provided code that calls Norm; perhaps it would help if you could provide a code snippet that uses Norm. $\endgroup$ – yosimitsu kodanuri Jan 14 at 16:27
  • 2
    $\begingroup$ What is it you want the code to do? Perhaps starting over is an option? $\endgroup$ – mjw Jan 14 at 16:58

Browse other questions tagged or ask your own question.