Extract 2d data
Created by
Mathematica
(September 8, 2003)
![RowBox[{RowBox[{d2d2, =, RowBox[{(, RowBox[{{#[[which[[1]]]], #[[which[[2]]]]} &, /@, , RowBox[{(, RowBox[{data2, /, 255.}], )}]}], )}]}], ;}]](../HTMLFiles/index_67.gif){kind=small}