File: pca_over_component.tmpl

package info (click to toggle)
libdemeter-perl 0.9.27%2Bds6-9
  • links: PTS, VCS
  • area: contrib
  • in suites: forky, sid, trixie
  • size: 74,028 kB
  • sloc: perl: 73,233; python: 2,196; makefile: 1,999; ansic: 1,368; lisp: 454; sh: 74
file content (11 lines) | stat: -rw-r--r-- 338 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
 
{
  $datastyle = ($P->datastyle eq 'solid') ? 'lines' : 'points';

  $temp = $P->tempfile;
  $S->points(file    => $temp,
             space   => 'x', 
             suffix  => 'ev'.$component,
            );
  q{};
}
replot '{$temp}' using 1:2 with {$C->default("gnuplot", "datastyle")} ls {$P->increm+1} title "Component {$component+1}"