1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
#!/bin/bash
#
# Check if all required libraries are available.
isusageprinted() {
if bin/"$1" 2>&1 | grep -q Usage ; then
echo "success: $1 print usage information"
else
echo "error: $1 do not print usage information"
fi
}
# These print usage information
for p in eigenstrat eigenstratQTL pca ; do
isusageprinted $p
done
# These do not:
# baseprog fixgreen smarteigenstrat convertf gc.perl
# smarteigenstrat.perl mergeit smartpca smartpca.perl
# evec2pca-ped.perl pcatoy smartrel evec2pca.perl ploteig twstats
|
