teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

2

ソースを追加

2021/01/20 09:52

投稿

ppaul
ppaul

スコア24672

answer CHANGED
@@ -19,4 +19,219 @@
19
19
  をみれば分かります。
20
20
 
21
21
  しかし、2メディアンであれば、最適解はAとEになりますね。
22
- これはどうやって求めれば良いのかというアルゴリズムが分からないので、もう少し詳しく書いてもらえませんか。
22
+ これはどうやって求めれば良いのかというアルゴリズムが分からないので、もう少し詳しく書いてもらえませんか。
23
+
24
+ ---------------------------------------------------------------
25
+ YATさんが期待するのは以下のプログラムでよろしいですか。
26
+ 関数分割をしたとき、本来であれば1次元配列に変えて受け渡しをするべきなのですが、そこまでやる気力がなく、外部変数とさせていただきました。変数名や関数名も間に合わせですみません。
27
+ また、k=1とk>2を同じアルゴリズムで書くために無限大を使っています。こういう使い方については賛否両論あるだろうとは思います。
28
+
29
+ ```C
30
+ #include <stdio.h>
31
+ #include <stdlib.h>
32
+ #include <math.h>
33
+ #define FNLEN (50)
34
+ #define MAX_N (100)
35
+ #define NOTSELECTED (0)
36
+ #define SELECTED (1)
37
+
38
+ double dem[MAX_N]; //重み
39
+ double dist[MAX_N][MAX_N]; //距離
40
+ double wdist[MAX_N][MAX_N]; //重み付き距離
41
+ double wdistk[MAX_N][MAX_N]; //k番目の重み付き距離
42
+ double wsum[MAX_N]; //重み付き距離合計
43
+ double mindist[MAX_N]; //重みの最小値
44
+ int selected[MAX_N]; //既に選ばれた列
45
+ int nnode; // ノード数
46
+
47
+ void read_data(void) {
48
+ FILE *fp;
49
+ int i, j;
50
+ char file_name[FNLEN];
51
+
52
+ printf("Data file name: "); scanf("%s", file_name);
53
+ if ((fp = fopen(file_name,"r")) == NULL){
54
+ printf("%s: ファイルをオープンできません!\n", file_name);
55
+ exit(-1);
56
+ }
57
+
58
+ printf("データファイル名: %s\n", file_name);
59
+ fscanf(fp,"%d",&nnode);
60
+ if (nnode < 1 || nnode > MAX_N) {
61
+ printf("ノードの数は1以上%3d以下にしてください!\n", MAX_N);
62
+ exit(-1);
63
+ }
64
+
65
+ for (i = 0; i < nnode; i++){
66
+ fscanf(fp, "%lf", &dem[i]);
67
+ }
68
+ for (i = 0; i < nnode; i++){
69
+ for (j = 0; j < nnode; j++){
70
+ fscanf(fp, "%lf", &dist[i][j]);
71
+ }
72
+ }
73
+ fclose(fp);
74
+ return;
75
+ }
76
+
77
+ void initialize(void) {
78
+ int i;
79
+ for (i=0; i<nnode; i++) {
80
+ mindist[i] = INFINITY;
81
+ selected[i] = NOTSELECTED;
82
+ }
83
+ }
84
+
85
+ void cal_wdist(void) {
86
+ int i, j;
87
+
88
+ for (i = 0; i < nnode; i++) {
89
+ for (j = 0; j < nnode; j++) {
90
+ wdist[i][j] = dem[i] * dist[i][j];
91
+ }
92
+ }
93
+ return;
94
+ }
95
+
96
+ void print_double(double d) {
97
+ if (d == INFINITY) {
98
+ printf(" - ");
99
+ }
100
+ else {
101
+ printf("%5.1f ", d);
102
+ }
103
+ }
104
+
105
+ void print_wdistk(int k, int select) {
106
+ int i, j;
107
+
108
+ printf(" ");
109
+ for (i=0; i < nnode; i++) {
110
+ printf(" N%03d ", i+1);
111
+ }
112
+ printf("\n");
113
+
114
+ for (i = 0; i < nnode; i++) {
115
+ printf("N%03d ", i+1);
116
+ for (j = 0; j < nnode; j++) {
117
+ print_double(wdistk[i][j]);
118
+ }
119
+ printf("\n");
120
+ }
121
+ printf("合計 ");
122
+ for (j = 0; j < nnode; j++) {
123
+ print_double(wsum[j]);
124
+ }
125
+ printf("\n\nk=%dの最小値の列番号は %dで、その合計は ", k, select + 1);
126
+ print_double(wsum[select]);
127
+ printf("\n\n\n");
128
+ return;
129
+ }
130
+
131
+ int cal_wdistk(void) {
132
+ int i, j;
133
+ int min_index = 0;
134
+
135
+ for (j = 0; j < nnode; j++) {
136
+ for (i = 0; i < nnode; i++) {
137
+ if (selected[j] == SELECTED) {
138
+ wdistk[i][j] = INFINITY;
139
+ }
140
+ else if (wdist[i][j] < mindist[i]) {
141
+ wdistk[i][j] = wdist[i][j];
142
+ }
143
+ else {
144
+ wdistk[i][j] = mindist[i];
145
+ }
146
+ }
147
+ }
148
+ for (j = 0; j < nnode; j++) {
149
+ wsum[j] = 0.0;
150
+ for (i = 0; i < nnode; i++) {
151
+ wsum[j] += wdistk[i][j];
152
+ }
153
+ }
154
+ for (j = 1; j < nnode; j++) {
155
+ if (wsum[min_index] > wsum[j]) {
156
+ min_index = j;
157
+ }
158
+ }
159
+ return min_index;
160
+ }
161
+
162
+ void update(int select) {
163
+ int j;
164
+
165
+ selected[select] = SELECTED;
166
+ for (j=0; j < nnode; j++) {
167
+ if (wdist[j][select] < mindist[j]) {
168
+ mindist[j] = wdist[j][select];
169
+ }
170
+ }
171
+ }
172
+
173
+ int main()
174
+ {
175
+ int k, select;
176
+
177
+ read_data();
178
+ initialize();
179
+ cal_wdist();
180
+
181
+ for (k=1; k < nnode; k++) {
182
+ select = cal_wdistk();
183
+ print_wdistk(k, select);
184
+ update(select);
185
+ }
186
+
187
+ return 0;
188
+ }
189
+ ```
190
+
191
+ 出力例は以下です。
192
+
193
+ ```shell
194
+ データファイル名: b.txt
195
+ N001 N002 N003 N004 N005
196
+ N001 0.0 80.0 120.0 200.0 240.0
197
+ N002 70.0 0.0 140.0 210.0 245.0
198
+ N003 9.0 12.0 0.0 6.0 9.0
199
+ N004 150.0 180.0 60.0 0.0 60.0
200
+ N005 270.0 315.0 135.0 90.0 0.0
201
+ 合計 499.0 587.0 455.0 506.0 554.0
202
+
203
+ k=1の最小値の列番号は 3で、その合計は 455.0
204
+
205
+
206
+ N001 N002 N003 N004 N005
207
+ N001 0.0 80.0 - 120.0 120.0
208
+ N002 70.0 0.0 - 140.0 140.0
209
+ N003 0.0 0.0 - 0.0 0.0
210
+ N004 60.0 60.0 - 0.0 60.0
211
+ N005 135.0 135.0 - 90.0 0.0
212
+ 合計 265.0 275.0 - 350.0 320.0
213
+
214
+ k=2の最小値の列番号は 1で、その合計は 265.0
215
+
216
+
217
+ N001 N002 N003 N004 N005
218
+ N001 - 0.0 - 0.0 0.0
219
+ N002 - 0.0 - 70.0 70.0
220
+ N003 - 0.0 - 0.0 0.0
221
+ N004 - 60.0 - 0.0 60.0
222
+ N005 - 135.0 - 90.0 0.0
223
+ 合計 - 195.0 - 160.0 130.0
224
+
225
+ k=3の最小値の列番号は 5で、その合計は 130.0
226
+
227
+
228
+ N001 N002 N003 N004 N005
229
+ N001 - 0.0 - 0.0 -
230
+ N002 - 0.0 - 70.0 -
231
+ N003 - 0.0 - 0.0 -
232
+ N004 - 60.0 - 0.0 -
233
+ N005 - 0.0 - 0.0 -
234
+ 合計 - 60.0 - 70.0 -
235
+
236
+ k=4の最小値の列番号は 2で、その合計は 60.0
237
+ ```

1

書き間違いの修正

2021/01/20 09:52

投稿

ppaul
ppaul

スコア24672

answer CHANGED
@@ -18,5 +18,5 @@
18
18
  499.0 587.0 455.0 506.0 554.0
19
19
  をみれば分かります。
20
20
 
21
- しかし、メディアンであれば、最適解はAとEになりますね。
21
+ しかし、メディアンであれば、最適解はAとEになりますね。
22
22
  これはどうやって求めれば良いのかというアルゴリズムが分からないので、もう少し詳しく書いてもらえませんか。