gelinive

git clone git://bebou.netlib.re/gelinive
Log | Files | Refs | README |

commit 37cbab7e88b71bd97f8a7a4f1ef332df0c51e54c
parent fc56838503cb07441d73a08c1e4ecfa1f7a96928
Auterice: Arthur Pons <arthur.pons@unistra.fr>
Date:   Wed, 13 Mar 2024 19:51:43 +0100

makehistodata dans geliniveplot pour

Pour que le format d'échange entre gelinive et geliniveplot
soit le tableau complet. Voir la refléxion dans le commit précédant.

Diffstat:
M
geliniveplot
 | 
13
+++++++++++--
M
gelinivetest
 | 
2
--

2 files changed, 11 insertions(+), 4 deletions(-)
diff --git a/geliniveplot b/geliniveplot
@@ -178,9 +178,18 @@ I = {0.0, 1.0}
 VoxelDistance = 0.0
 x = 0.0
 set style textbox opaque noborder
-set label ARG2 at 343,25 rotate by -90 left boxed
+set label ARG1 at 343,25 rotate by -90 left boxed
 set label "Résistance au battage (Kg)" at 280,105 rotate by -90 left boxed
 set label "Température (°C)" at 294,105 rotate by -90 left boxed
+
+a(file)=sprintf("< sed '2,$ p' |\
+awk '{\
+l=NR;hc=$8;r=$7;getline;\
+if(l==NR) {hn=0} else {hn=$8};\
+for(i=hc;i>hn;i--) {print r}\
+}' |\
+sed '1!G;h;$!d'")
+
 ## Last datafile plotted: "histodata"
-plot "< cat" u 2 w histogram title ' ' lc rgbcolor "#aad9f3", ARG1 u 1:($2*-1) w lp axes x1y2 pt 7 lw 2 lc rgbcolor "#c97fe8" title ' '
+plot a("< cat") u 1 w histogram title ' ' lc rgbcolor "#aad9f3", ARG2 u 1:($2*-1) w lp axes x1y2 pt 7 lw 2 lc rgbcolor "#c97fe8" title ' '
 #    EOF
diff --git a/gelinivetest b/gelinivetest
@@ -76,8 +76,6 @@ cat $1 > $tempdir/profil                         # On stocke les données dans u
 topheight=$(tail -n1 $tempdir/profil | cut -f5) # On récupère le dernier champ de la dernière ligne
 < $tempdir/profil calc_R_e_H $topheight |       # On met dans stdin de la fonction les données, en argument la hauteur
 	tee "$3" 2> /dev/null |                     # On stocke le résultat dans un fichier, si l'argument existe
-	makehistodata |                             # On construit les données pour l'histogramme
-	sed '1!G;h;$!d' |                           # tac, imprime du bas vers le haut
 	./geliniveplot "$4" "$2" 2> /dev/null |     # On créé le graph, premier arg = fichier temp, second = titre
 	convert - -rotate -90 -                     # On tourne l'image pour qu'elle soit en format portrait