1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
#!/usr/bin/env bash
# Wrapper script for @P@display-r-py
# First ensure that we follow symlink if needed
LINK=`readlink $0`
# Am I a symlink?
if [ "x$LINK" != "x" ]; then
LIB=`dirname $LINK`
else
LIB=`dirname $0`
fi
LIB="$LIB/../tools/Python/@P@display/R"
TOOL="@P@display"
VERS="@MCCODE_VERSION@"
canrun() {
if ! [ -x ${LIB}/${TOOL}.py ]; then
exit 127;
fi
modules="yaml"
cmd=""
for name in ${modules}; do
cmd="${cmd}import ${name}; "
done
python -c "${cmd}"
}
if ( canrun ); then
CSVCOMPS=`mktemp -u comps.csv.XXX`
CSVLINES=`mktemp -u lines.csv.XXX`
echo
echo Running ${TOOL}.py for R output
echo - please give a few \[return\] if nothing happens!!
echo
mcrun $* --trace --no-output-files -n1e2 | python ${LIB}/${TOOL}.py ${CSVCOMPS} ${CSVLINES}
R_PROFILE_USER=${LIB}/display.r R ${CSVCOMPS} ${CSVLINES} --no-save
rm ${CSVCOMPS} ${CSVLINES}
else
echo ":: Failed to run Python ${TOOL}, trying old Perl version."
echo ":: If this fails too, consider reinstalling ${TOOL}."
echo ""
# Try old Perl-version of mcplot if Python version cannot run
${TOOL} $*
fi
|
