|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T c
Length: 620 (0x26c)
Types: TextFile
Names: »comp«
└─⟦87ddcff64⟧ Bits:30001253 CPHDIST85 Tape, 1985 Autumn Conference Copenhagen
└─⟦this⟧ »cph85dist/stat/scripts/comp«
#!/bin/sh
#compare two variables in an anova input file
#the data is assumed to be in the last column (x[N])
#Usage: comp column1 column2 datafile describer=desc pager=cat
c1=$1
c2=$2
dfile=$3
desc=${4-desc}
pager=${5-cat}
echo Comparing columns $c1 and $c2 in $dfile with $desc
l1=`dm s$c1 < $dfile | sort | uniq`
l2=`dm s$c2 < $dfile | sort | uniq`
echo Column $c1 labels: $l1
echo Column $c2 labels: $l2
for v1 in $l1
do
for v2 in $l2
do
(
echo ""
echo Description of "s$c1='$v1'" x "s$c2='$v2'" from $dfile
echo ""
dm "(s$c1='$v1' && s$c2='$v2') ? x[N] : KILL" < $dfile | $desc
) | $pager
done
done