r语言有关结点数据求秩的编程问题

要求用r语言编写程序，实现对有结点数据求秩，但不能用内置rank函数