clean


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

#!/bin/sh

# Author: Johannes Ranke <jranke@uni-bremen.de>

usage()
{
echo "Usage: ./clean [stretch|jessie]"
}

if [ $# -gt 1 ]; then usage; exit 1; fi
if [ $# -eq 1 ]
then
  DIST=$1
  if [ $DIST != "stretch" ] && [ $DIST != "jessie" ]; then usage; exit 1; fi
  cd $DIST
fi

for i in r-base tcl tk boot cluster codetools foreign kernsmooth lattice mgcv nlme r-cran-class r-cran-coda r-cran-mass r-cran-nnet r-cran-spatial rmatrix rodbc rpart survival littler rpy rpy2 rkward jags r-cran-rjags texinfo
do
    if ls $i*.deb 1> /dev/null 2>&1; then "Please take care of .deb files hanging around"; exit 1; fi
    rm -rf $i*
done