回答編集履歴

3

Update

2021/12/05 08:00

投稿

melian
melian

スコア20543

test CHANGED
@@ -9,113 +9,3 @@
9
9
  > `$1 != prev {printf "\n"; prev=$1}` # 空行を出力
10
10
 
11
11
  > `{print}` # その行自体を出力
12
-
13
-
14
-
15
- この awk スクリプトと同じ処理になるようにプログラムを変更します。ただ、データの数値をそのまま比較すると全てが孤立線になってしまいますので、10倍して整数値に丸めて比較しています(粗過ぎる?)
16
-
17
-
18
-
19
- ```c
20
-
21
- int tmp_count = 0;
22
-
23
- int prev = 0, cur = 0;
24
-
25
- double data[3];
26
-
27
- for (int i = 1; i < N - 1; i++)
28
-
29
- {
30
-
31
- for (int j = 1; j < M - 1; j++)
32
-
33
- {
34
-
35
- data[tmp_count] = a[i][j];
36
-
37
- tmp_count++;
38
-
39
- if (tmp_count == 3)
40
-
41
- {
42
-
43
- // 有効数字の桁数
44
-
45
- cur = (int)(data[0]*10);
46
-
47
- // 前の行の値と異なる場合は改行を出力
48
-
49
- if (cur != prev) fprintf(fp1,"\n");
50
-
51
- fprintf(fp1, "%6.6f\t%6.6f\t%6.6f\t\n", data[0], data[1], data[2]);
52
-
53
- tmp_count = 0;
54
-
55
- prev = cur;
56
-
57
- }
58
-
59
- }
60
-
61
- }
62
-
63
- fclose(fp1);
64
-
65
- ```
66
-
67
-
68
-
69
- ……さて、この結果は適切なのでしょうか……?
70
-
71
-
72
-
73
- ![splot](7b11511f668c34567a3c39dab03ae788.png)
74
-
75
-
76
-
77
- **追記**
78
-
79
-
80
-
81
- 単純に横(X軸方向)に伸ばすのであれば、`replot` すれば良いのですが、、、
82
-
83
-
84
-
85
- ```gnuplot
86
-
87
- #g-s_method.plt
88
-
89
- cd 'C:\Users\%USERNAME%\Desktop\gnuplot'
90
-
91
-
92
-
93
- set pm3d
94
-
95
- set pm3d map
96
-
97
- set pm3d interpolate 1, 10
98
-
99
- set ticslevel 0
100
-
101
- set cbrange[-1:1]
102
-
103
- set xrange [-1:1]
104
-
105
- set yrange [-1:1]
106
-
107
- set palette rgbformulae 15, 5, 7
108
-
109
- splot 'g-s_result.dat' with pm3d
110
-
111
- replot y
112
-
113
- ```
114
-
115
-
116
-
117
- こんな感じになりますが、さて?
118
-
119
-
120
-
121
- ![splot2](210b93f0773bc26ebe9d626324185a10.png)

2

Update

2021/12/05 08:00

投稿

melian
melian

スコア20543

test CHANGED
@@ -71,3 +71,51 @@
71
71
 
72
72
 
73
73
  ![splot](7b11511f668c34567a3c39dab03ae788.png)
74
+
75
+
76
+
77
+ **追記**
78
+
79
+
80
+
81
+ 単純に横(X軸方向)に伸ばすのであれば、`replot` すれば良いのですが、、、
82
+
83
+
84
+
85
+ ```gnuplot
86
+
87
+ #g-s_method.plt
88
+
89
+ cd 'C:\Users\%USERNAME%\Desktop\gnuplot'
90
+
91
+
92
+
93
+ set pm3d
94
+
95
+ set pm3d map
96
+
97
+ set pm3d interpolate 1, 10
98
+
99
+ set ticslevel 0
100
+
101
+ set cbrange[-1:1]
102
+
103
+ set xrange [-1:1]
104
+
105
+ set yrange [-1:1]
106
+
107
+ set palette rgbformulae 15, 5, 7
108
+
109
+ splot 'g-s_result.dat' with pm3d
110
+
111
+ replot y
112
+
113
+ ```
114
+
115
+
116
+
117
+ こんな感じになりますが、さて?
118
+
119
+
120
+
121
+ ![splot2](210b93f0773bc26ebe9d626324185a10.png)

1

Update

2021/12/05 04:45

投稿

melian
melian

スコア20543

test CHANGED
@@ -12,7 +12,7 @@
12
12
 
13
13
 
14
14
 
15
- この awk スクリプトと同じ処理になるようにプログラムを変更します。ただ、データの数値をそのまま比較すると全てが孤立線になってしまいますので、10倍して整数値に丸めています(粗過ぎる?)
15
+ この awk スクリプトと同じ処理になるようにプログラムを変更します。ただ、データの数値をそのまま比較すると全てが孤立線になってしまいますので、10倍して整数値に丸めて比較しています(粗過ぎる?)
16
16
 
17
17
 
18
18