求竞争风险模型后The fine and Gray model的实现！

用R语言使用竞争风险模型后得出生存，再想求多个影响因素之间的多因素分析，看文献需要使用The fine and Gray model ，请问怎么实现？有代码吗？谢谢！