A function for reseting SFR to zero
     
    
    
    Arguments
- x
 
numeric or DoOR response matrix, input values
 
- sfr
 
numeric or character, either a value to subtract if x is a vector
or an InChIKey if x is a DoOR response matrix
 
 
    
    Details
    Performs a simple subtraction of the SFR value.
     
    
    
    Examples
    # load data
library(DoOR.data)
data(door_response_matrix)
# create a response matrix with the SFR reset to 0
door_response_matrix_SFRreset <- reset_sfr(door_response_matrix, "SFR")