An Algorithm for Mitigating Transient RFI in Pulsar Observation