Т_Ерритория б_Ез им_Ени

Ресурс разрабатывался с целью преодоления граничащего с преступлением недостатка информации и тех. средств в области геомеханики и комплексной обработки массивов цифровой информации (ни один пакет: Maple, Mathematica, и даже MathCad и MatLab - не показали должного уровня обработки именно такого типа информации. Delphi даже в расчёт не берётся).

Уже в сентябре 2004 года текущие наработки и собранная литература не позволили автору игнорировать подобное положение вещей.

mykaralw@yandex.ru

Построение карт в Microsoft Excel 2000.

Надстройка XlMatrix for MS Excel.

В данном проекте уделено особое внимание построению поверхностей и работа с ними средствами MS Excel.

Пример поверхности, построенной из точек с координатами (X,Y,H):

Исходные данные:

Результаты:

№	x	y	z
1	1011	2027	100.3
2	1049	2048	105.6
3	1022	2040	104.4
4	1002	2027	101.2
5	1011	2030	102.0
6	1036	2013	104.9
7	1046	2018	100.6
8	1023	2026	106.5
9	1026	2037	103.4
10	1039	2018	104.1
11	1010	2049	102.7
12	1048	2017	107.4
13	1009	2044	104.1
14	1019	2012	102.2
15	1019	2018	105.3
16	1041	2025	102.6
17	1027	2007	106.7
18	1035	2039	104.7
19	1041	2017	100.3
20	1012	2002	100.8
21	1024	2005	103.4
22	1018	2044	100.8
23	1038	2034	106.8
24	1035	2005	109.1
25	1002	2045	100.3
26	1008	2021	107.6
27	1002	2037	102.7
28	1014	2036	106.1
29	1041	2010	104.2
30	1020	2040	101.7
31	1027	2049	106.1
32	1037	2002	105.5
33	1033	2039	103.8
34	1049	2008	107.9
35	1031	2016	101.4
36	1010	2040	103.8
37	1017	2031	100.6
38	1017	2024	104.4
39	1031	2021	105.0
40	1012	2037	109.1
41	1043	2045	107.9
42	1034	2008	103.8
43	1031	2004	100.1
44	1013	2025	105.9
45	1032	2031	104.0
46	1024	2025	107.5
47	1004	2018	103.0
48	1024	2003	109.8
49	1026	2028	106.6
50	1030	2040	102.4

Результат применения функции `=SigmoidMatrixMap(MMatrix("#ссылка");nX;nY)`

Рис.1.а. Панорамма поверхности
(с помощью суперпозиции сигмоидных функций)

Рис.1.б. План поверхности
(с помощью суперпозиции сигмоидных функций)

Результат применения функции `=TriangulationMatrixMapColor(MMatrix("#ссылка");nX;nY)`

Рис.2.а. Панорамма поверхности
(закрашиванием треугольников)

Рис.2.б. План поверхности
(закрашиванием треугольников)

Результат применения функции `=TriangulationMatrixMap(MMatrix("#ссылка");MMatrix("#ссылка");nX;nY)`

Рис.3. Панорамма поверхности
(с применением триангуляции Делоне =TriangulationDelaunay(MMatrix("#ссылка")))

Вот, собственно, и всё на текущий момент.

Опубликовано 7 апреля 2006г.

Made in Terra No Names.

Сайт управляется системой uCoz

ТЕрритория бЕз имЕни