r语言找不到对象报错，请问是哪里的问题

自己写一个求有结点数据秩的函数，请教一下这个代码哪里有问题，已经定义变量了还是报错
这是软件运行结果