Hello friends. I want to extract data from the 3D plot in the following code. I have used MatrixForm[%], but it is not working. Can you help me to get the desired data.
This is a way:
Cases[Normal[%[[1]]], Polygon[pts_, ___] :> pts, All]
Thanks Sir for your reply.
Sir, I want to have the data in matrix form, from where I can generate the Excel sheet. Can you help me?
This way you probably get a list of triples:
Union@Flatten[Cases[Normal[%[[1]]], Polygon[pts_, ___] :> pts, All], 1]
Thanks sir for your reply.