50金币悬赏一道生存分析logrank test的题 用R

A: for 15 subjects, their time to event data are 1,1,1+,1+,1+,2,2,2,2+,2+3,3,3+,4+,5+
B: for the other 15 subjects, their time to event data are 2,2,3+,4,5+,5,7,7+,9,10,10,10,10+,12,13
perform LOGRANK test to compare B survival curve to that of A, calculate p-value, and plot both survival curves.

谢谢诸位！请用R实现，悬赏金币。

大家都不回答那就自己顶顶吧 这个题都半年多了。。。