如何在R中的robustbase程序包中使用nlrob（）函数进行LAD回归？

Question

我想在R中的robustbase包中使用nlrob（）函数来进行LAD回归。

LAD估计器是具有以下Psi函数的M估计器：

psi = sign(x)

因此，我想使用以下代码运行回归：

result = nlrob(y ~ a + x ^b, data = testdata,method = "M" ,psi =  myfunction)

我的问题是：如何定义myfunction以获得LAD估计？