Полная версия этой страницы: Построить поверхность по выборке
Здраствуйте! Есть у меня матрица 10 на 10, нужно построить поверхность в программе Статистика, сам строю - не получается, каждая зависимость отдельной поверхностью, прошу помощи у Вас!
Цитата(Artmaster911 @ 14.07.2012 - 00:07) 
Здраствуйте! Есть у меня матрица 10 на 10, нужно построить поверхность в программе Статистика, сам строю - не получается, каждая зависимость отдельной поверхностью, прошу помощи у Вас!
Для построения поверхности у вас должно быть 3 колонки, а не 11, т.е. собственно: x, y и z. Распределите матрицу по этим трём колонкам, десятикратно продублировав соответствующие значения для x и y. После построения в опции графика Poit of view добейтесь наиболее информативного вида поверхности.
Цитата(nokh @ 14.07.2012 - 07:31)
Распределите матрицу по этим трём колонкам, десятикратно продублировав соответствующие значения для x и y. После построения в опции графика Poit of view добейтесь наиболее информативного вида поверхности.
Спасибо! Но как, просто выбрать из 11, 3 значения, допустим 1, 5, 10, и строить? Можете для примера что-нибудь привести?
Цитата(Artmaster911 @ 14.07.2012 - 07:40)
Спасибо! Но как, просто выбрать из 11, 3 значения, допустим 1, 5, 10, и строить? Можете для примера что-нибудь привести?
как то так
Код
> data<-read.csv2("table.csv", header=FALSE)
> rownames(data)<-seq(from=0.1, to=1, by=0.1)
> colnames(data)<-seq(from=0.1, to=1, by=0.1)
> melt.array(as.matrix(data))
X1 X2 value
1 0.1 0.1 1.050
2 0.2 0.1 2.100
3 0.3 0.1 3.150
4 0.4 0.1 4.200
5 0.5 0.1 5.250
6 0.6 0.1 6.300
7 0.7 0.1 7.350
8 0.8 0.1 8.400
9 0.9 0.1 9.450
10 1.0 0.1 10.500
11 0.1 0.2 0.552
12 0.2 0.2 1.104
13 0.3 0.2 1.660
14 0.4 0.2 2.210
15 0.5 0.2 2.760
16 0.6 0.2 3.310
17 0.7 0.2 3.870
18 0.8 0.2 4.420
19 0.9 0.2 4.970
20 1.0 0.2 5.520
21 0.1 0.3 0.386
22 0.2 0.3 0.772
23 0.3 0.3 1.160
24 0.4 0.3 1.540
25 0.5 0.3 1.930
26 0.6 0.3 2.310
27 0.7 0.3 2.700
28 0.8 0.3 3.080
29 0.9 0.3 3.470
30 1.0 0.3 3.860
31 0.1 0.4 0.303
32 0.2 0.4 0.607
33 0.3 0.4 0.910
34 0.4 0.4 1.210
35 0.5 0.4 1.520
36 0.6 0.4 1.820
37 0.7 0.4 2.120
38 0.8 0.4 2.430
39 0.9 0.4 2.730
40 1.0 0.4 3.030
41 0.1 0.5 0.254
42 0.2 0.5 0.508
43 0.3 0.5 0.762
44 0.4 0.5 1.020
45 0.5 0.5 1.270
46 0.6 0.5 1.520
47 0.7 0.5 1.780
48 0.8 0.5 2.030
49 0.9 0.5 2.290
50 1.0 0.5 2.540
51 0.1 0.6 0.222
52 0.2 0.6 0.443
53 0.3 0.6 0.665
54 0.4 0.6 0.887
55 0.5 0.6 1.110
56 0.6 0.6 1.330
57 0.7 0.6 1.550
58 0.8 0.6 1.770
59 0.9 0.6 1.990
60 1.0 0.6 2.220
61 0.1 0.7 0.199
62 0.2 0.7 0.397
63 0.3 0.7 0.596
64 0.4 0.7 0.795
65 0.5 0.7 0.993
66 0.6 0.7 1.190
67 0.7 0.7 1.390
68 0.8 0.7 1.590
69 0.9 0.7 1.790
70 1.0 0.7 1.990
71 0.1 0.8 0.182
72 0.2 0.8 0.363
73 0.3 0.8 0.545
74 0.4 0.8 0.726
75 0.5 0.8 0.908
76 0.6 0.8 1.090
77 0.7 0.8 1.270
78 0.8 0.8 1.450
79 0.9 0.8 1.630
80 1.0 0.8 1.820
81 0.1 0.9 0.169
82 0.2 0.9 0.337
83 0.3 0.9 0.506
84 0.4 0.9 0.674
85 0.5 0.9 0.843
86 0.6 0.9 1.010
87 0.7 0.9 1.180
88 0.8 0.9 1.350
89 0.9 0.9 1.520
90 1.0 0.9 1.690
91 0.1 1.0 0.158
92 0.2 1.0 0.316
93 0.3 1.0 0.475
94 0.4 1.0 0.633
95 0.5 1.0 0.791
96 0.6 1.0 0.949
97 0.7 1.0 1.110
98 0.8 1.0 1.270
99 0.9 1.0 1.420
100 1.0 1.0 1.580
> rownames(data)<-seq(from=0.1, to=1, by=0.1)
> colnames(data)<-seq(from=0.1, to=1, by=0.1)
> melt.array(as.matrix(data))
X1 X2 value
1 0.1 0.1 1.050
2 0.2 0.1 2.100
3 0.3 0.1 3.150
4 0.4 0.1 4.200
5 0.5 0.1 5.250
6 0.6 0.1 6.300
7 0.7 0.1 7.350
8 0.8 0.1 8.400
9 0.9 0.1 9.450
10 1.0 0.1 10.500
11 0.1 0.2 0.552
12 0.2 0.2 1.104
13 0.3 0.2 1.660
14 0.4 0.2 2.210
15 0.5 0.2 2.760
16 0.6 0.2 3.310
17 0.7 0.2 3.870
18 0.8 0.2 4.420
19 0.9 0.2 4.970
20 1.0 0.2 5.520
21 0.1 0.3 0.386
22 0.2 0.3 0.772
23 0.3 0.3 1.160
24 0.4 0.3 1.540
25 0.5 0.3 1.930
26 0.6 0.3 2.310
27 0.7 0.3 2.700
28 0.8 0.3 3.080
29 0.9 0.3 3.470
30 1.0 0.3 3.860
31 0.1 0.4 0.303
32 0.2 0.4 0.607
33 0.3 0.4 0.910
34 0.4 0.4 1.210
35 0.5 0.4 1.520
36 0.6 0.4 1.820
37 0.7 0.4 2.120
38 0.8 0.4 2.430
39 0.9 0.4 2.730
40 1.0 0.4 3.030
41 0.1 0.5 0.254
42 0.2 0.5 0.508
43 0.3 0.5 0.762
44 0.4 0.5 1.020
45 0.5 0.5 1.270
46 0.6 0.5 1.520
47 0.7 0.5 1.780
48 0.8 0.5 2.030
49 0.9 0.5 2.290
50 1.0 0.5 2.540
51 0.1 0.6 0.222
52 0.2 0.6 0.443
53 0.3 0.6 0.665
54 0.4 0.6 0.887
55 0.5 0.6 1.110
56 0.6 0.6 1.330
57 0.7 0.6 1.550
58 0.8 0.6 1.770
59 0.9 0.6 1.990
60 1.0 0.6 2.220
61 0.1 0.7 0.199
62 0.2 0.7 0.397
63 0.3 0.7 0.596
64 0.4 0.7 0.795
65 0.5 0.7 0.993
66 0.6 0.7 1.190
67 0.7 0.7 1.390
68 0.8 0.7 1.590
69 0.9 0.7 1.790
70 1.0 0.7 1.990
71 0.1 0.8 0.182
72 0.2 0.8 0.363
73 0.3 0.8 0.545
74 0.4 0.8 0.726
75 0.5 0.8 0.908
76 0.6 0.8 1.090
77 0.7 0.8 1.270
78 0.8 0.8 1.450
79 0.9 0.8 1.630
80 1.0 0.8 1.820
81 0.1 0.9 0.169
82 0.2 0.9 0.337
83 0.3 0.9 0.506
84 0.4 0.9 0.674
85 0.5 0.9 0.843
86 0.6 0.9 1.010
87 0.7 0.9 1.180
88 0.8 0.9 1.350
89 0.9 0.9 1.520
90 1.0 0.9 1.690
91 0.1 1.0 0.158
92 0.2 1.0 0.316
93 0.3 1.0 0.475
94 0.4 1.0 0.633
95 0.5 1.0 0.791
96 0.6 1.0 0.949
97 0.7 1.0 1.110
98 0.8 1.0 1.270
99 0.9 1.0 1.420
100 1.0 1.0 1.580
p2004r, Спасибо большущее! Получилось) А что за программой Вы так лихо раскидали значения?
Цитата(Artmaster911 @ 14.07.2012 - 18:51)
p2004r, Спасибо большущее! Получилось) А что за программой Вы так лихо раскидали значения?
Это среда анализа данных R. Данный программный продукт распространяется под лицензией GPL. Его можно скачать совершенно бесплатно. Вот основной сайт системы http://cran.r-project.org/
В основе среды лежит компилятор-интерпретатор диалекта лиспа Схема (с измененным синтаксисом, в него внесено много операторов из APL). Язык легко подключает в себя программы на других языках программирования и сам встраивается практически везде куда только можно.
Функции как полноправные объекты языка, clos подобная система объектов. Это приводит к тому, что
в языке R крайне мощные высокоуровневые операторы, и анализ данных редко занимает больше чем несколько строчек кода.
Если нужна коммерческая поддержка, то есть фирма Революшен. Она распространяет корпоративную версию с платной поддержкой.
Вот перевод на русский официального "Введение в R". http://m7876.wiki.zoho.com/Introduction-to-R.html
Еще один форум где ведется техподдержка на русском языке http://molbiol.ru/forums/index.php?showtopic=102724
Сообщество в ЖЖ на русском http://r-statistics.livejournal.com/
Спасибо, теперь буду в курсе, где брать информацию!
Цитата(Artmaster911 @ 15.07.2012 - 12:26)
Спасибо, теперь буду в курсе, где брать информацию!
забыл совсем сказать, в последних версиях статистики присутствует встроенная R
С 6-й пока что работаю, изменения небольшие в новых версиях, так только добавлено доп. возможностей, которые мне по большому счету не нужны. Еще раз Спасибо за дельную информацию и потраченное Вами время!
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.