How to make a three-dimensional surface with rectangular polygons given a 2x2 matrix?
How to make a three-dimensional surface with rectangles given a 2x2 matrix
x's=index of row
y's=indexes of columns
z's=value in element of matrix index row and column.
(x,y,z)
ListT= {{10, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {10, 1, 0, 0, 0, 0, 0, 0, 0, 0}, {10, 1.8, 0.1, 0, 0, 0, 0, 0, 0, 0}, {10, 2.45, 0.26, 0.01, 0, 0, 0, 0, 0, 0}, {10, 2.986, 0.454, 0.034, 0.001, 0, 0, 0, 0, 0}, {10, 3.434, 0.665, 0.072, 0.004, 0, 0, 0, 0, 0}, {10, 3.813, 0.882, 0.124, 0.01, 0, 0, 0, 0, 0}, {10, 4.138, 1.099, 0.188, 0.02, 0.001, 0, 0, 0, 0}, {10, 4.42, 1.311, 0.262, 0.034, 0.002, 0, 0, 0, 0}, {10, 4.667, 1.517, 0.344, 0.053, 0.005, 0, 0, 0, 0}, {10, 4.885, 1.714, 0.432, 0.077, 0.009, 0, 0, 0, 0}}
I am trying this command but it is not complete surface:
Sequence(Sequence(Polygon({(i, j, Element(ListT, i, j)), (i + 1, j, Element(ListT, i + 1, j)), (i + 1, j + 1, Element(ListT, i + 1, j + 1)), (i, j + 1, Element(ListT, i, j + 1))}), i, 1, nF - 1, 1), j, 1, nC - 1, 1)
The same question 
yo tengo una hecha aqui
https://www.geogebra.org/m/hpfm6mfc
pero parece que hay problemas en la reproduccion de ciertos applets online
mira a ver de descargarla y ver si te funciona
no te puede salir usando poligonos porque en general cuatro de los valores no dan puntos coplanarios. hay que hacer unas superficies parametrizadas segun los segmentos del borde de la zona cuadrangular
yo tengo una hecha aqui
https://www.geogebra.org/m/hpfm6mfc
pero parece que hay problemas en la reproduccion de ciertos applets online
mira a ver de descargarla y ver si te funciona
no te puede salir usando poligonos porque en general cuatro de los valores no dan puntos coplanarios. hay que hacer unas superficies parametrizadas segun los segmentos del borde de la zona cuadrangular
Para los segmentos
Sequence(Sequence(Segment((k, j, 0), (k, j, M(k, j))), k, 1, Length(M)), j, 1, Length(Element(M, 1)))
Para los puntos
Sequence(Sequence((k, j, M(k, j)), k, 1, Length(M)), j, 1, Length(Element(M, 1)))
Para la superficie
Sequence(Sequence(Surface((1 - u) (1 - v) (k, j, M(k, j)) + (1 - u) v (k, j + 1, M(k, j + 1)) + u (1 - v) (k + 1, j, M(k + 1, j)) + u v (k + 1, j + 1, M(k + 1, j + 1)), u, 0, 1, v, 0, 1), k, 1, Length(M) - 1), j, 1, Length(Element(M, 1)) - 1)
Gracias.
Comments have been locked on this page!