1 |
grep -B1 RT "$@" | perl -e 'while(<>){ @l0 = split; @l1 = split " ", scalar <>; print "$l0[7] $l0[9] $l1[9] $l1[11]\n"}'|tr -d :|sed -e 's/(Correct)/1/' -e 's/(Incorrect)/0/' | sed -e 's/-/-10/'|xgobi |
{ |
2 |
|
# Learning phase |
3 |
|
grep -A100 "Learning phase" "$@" | |
4 |
|
grep Trial | |
5 |
|
awk '{print ($8-110) " " $10 " -1000 -1" }' |
6 |
|
|
7 |
|
# Online test |
8 |
|
grep -B1 RT "$@" | |
9 |
|
perl -e 'while(<>){ @l0 = split; @l1 = split " ", scalar <>; print "$l0[7] $l0[9] $l1[9] $l1[11]\n"}' | |
10 |
|
tr -d : | |
11 |
|
sed -e 's/(Correct)/1/' -e 's/(Incorrect)/0/' | |
12 |
|
sed -e 's/-/-10/' |
13 |
|
} | xgobi |