MathGroup Archive 2012

[Date Index] [Thread Index] [Author Index]

Search the Archive

Laser Scan Image Acuisition

  • To: mathgroup at smc.vnet.net
  • Subject: [mg126626] Laser Scan Image Acuisition
  • From: Abhilash Sukumari <abhilashsukumari at gmail.com>
  • Date: Sat, 26 May 2012 05:13:43 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com

Hello , 

 I am acquiring data using light scattered off a target and collecting the intenstity values.

I would like to know if there is any method in mathematica I can use to make an image other than ArrayPlot,ReliefPlot or ListDensityPlot.

All I want to know is , if there is an better way I can plot the images using the intensity values ??? 

Right now I am doing the following code :
-----------------------------------------------------------------------------
test = Import[
   "C:\\Users\\Raman\\Desktop\\DATA RESULT\\Image\\test 6.csv"];
Z = Partition[Map[Last, test], Sqrt[Length[test]]];
(*Z//MatrixForm
Max[Z]
Min[Z]
ArrayPlot[Z,PlotRange -> All,ColorRules -> {Max[Z]-> White,Min[Z] -> \
Red},ColorFunctionScaling -> True  ]
GraphicsRow[{ReliefPlot[Z,PlotRange->Automatic,ColorFunction-> \
GrayLevel],
ListDensityPlot[Z,PlotRange -> All, ColorFunction -> GrayLevel,Mesh \
-> False]}]*)
ReliefPlot[Z, PlotRange -> Automatic, ColorFunction -> GrayLevel]
ListDensityPlot[Z, PlotRange -> All, ColorFunction -> GrayLevel, 
 Mesh -> False, PlotRange -> All]
ListPlot3D[Z, PlotRange -> All, ColorFunction -> GrayLevel, 
 Mesh -> False, PlotRange -> All]
Dimensions[Z]

--------------------------------------------------------------------------

Can anyone who has prior experience with Imaging or Image processing using mathematica Guide me through. 

Thanks you 
Abhi
abhilashsukumari at gmail.com



  • Prev by Date: Re: Loss of precision
  • Next by Date: Re: Stop on message?
  • Previous by thread: Re: LaTeX and the ConversionRules option
  • Next by thread: Re: Laser Scan Image Acuisition