FDTDの視覚化

平野拓一

SetDirectory["d:/hira/study/fdtd/analysis/small_dipole/2d/f90"]

\(lis = 
          ReadList["field.dat", Number, NullWords\  -> True, 
            RecordSeparators -> {"

"}, 

            RecordLists -> True];\)
  
ListDensityPlot[
      lis, 
ColorFunction -> (Hue[-0.7*(# - 
                    1), 1, 1] &), 
      Mesh -> False, 
AspectRatio -> 
        Automatic, 
FrameTicks -> 
        False, 
PlotRange -> {0, 0.04}]