Hello!
The two tables in the object are just data.frames, so you can save them like any other table with "write.table". Something like "write.table(obj$taxon_data, sep = "\t"). Will that do what you need? If not, I can take a look at a part of your data and give some more specific suggestions. Thanks,