Started renormalize(), but didn't actually get anywhere. This will need to be built out as a real functions (I assume the arguments are x,i and sep? Need to look into hadley's lazyeval package, see if you can put that to use).