# Original and modified factor vectors
original_factor <- factor(c('apple', 'banana', 'cherry'))
modified_factor <- factor(c('apple_fruit', 'banana_fruit', 'cherry_fruit'))
# Create mapping table
ft_mapping(original_factor, modified_factor)
Run the code above in your browser using DataLab