1 2 3 4 5 6 7 8 9 10 11 12 13
|
{ # -*- ifm -*-
# template for overplotting running R-factor function
# {$D->group} returns the ifeffit group name
# {$D->parameter} returns the value of that parameter
# {$P->parameter} returns the value of a Plot parameter
$suffix = ($C->get("run_space") =~ m{\Ak}) ? 'krun'
: ($C->get("run_space") =~ m{\Ar}) ? 'rrun'
: 'qrun';
q{}
}
###__ plot running R-factor ___
plot({$D->group}.{$C->get("run_space")}, "{$C->get("run_scale")}*{$D->group}.{$suffix}+{$D->y_offset}",
style={$P->datastyle}, color={$P->color}, key="running R-factor")
|