File: simple.script

package info (click to toggle)
autoclass 3.3.6.dfsg.1-2
  • links: PTS
  • area: main
  • in suites: bookworm, bullseye, sid
  • size: 5,808 kB
  • sloc: ansic: 16,726; makefile: 114; csh: 111; sh: 98; cpp: 95
file content (19 lines) | stat: -rw-r--r-- 620 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
BEGIN{
  FS="[ ()]+";
  printf("set key bottom\n");
  printf("set title \"groups found by AutoClass\"\n");
  printf("set parametric; set trange [0:6.28]\n");
  printf("plot \\\n");
}
/^[0-9][0-9]/{
  if ($5~/latitude/) {next; latmean=$3; latsd=$4; ++data}
  if ($5~/longitude/) {next; lonmean=$3; lonsd=$4; ++data}
  if (data == 2) {
    if (group) printf(",\\\n");
    printf("%s+2.45*%s*sin(t),%s+2.45*%s*cos(t) title \"group %d 95%% contour\",\\\n",
        lonmean, lonsd, latmean, latsd, group);
    printf("  \"group%d\" title \"group %d members\"", group, group);
    data=0; group++;
  }
}
END {  printf("\n");}