ProjectionPursuit function

Projection Pursuit