Update plottingPies.R

To do:
take into account location.2.3 and select acitivities