在LR中如何编写自定义函数？请给出一些你在以前进行的项目中编写的函数。