add prune network function

[domisch]

Make the prune network function, currently an interactive function between R and GRASS, stanmd-alone in teh package