相对R /编程/ github新手，请原谅我的无知。
我正在尝试基于窗口提取线段模式中的线段子集。 Subset.psp又名Extract.psp又名[.psp几乎做了我想要的，除了我想要排除穿过窗口边界而不是剪裁它们的线段。
示例：根据窗口“eroded”子集psp“d”以生成一个名为“deroded”的新psp
> deroded <- d[eroded]
> plot(d, col="blue", main="deroded")
> plot(eroded, add=TRUE, col="red")
> plot(deroded, add=TRUE, col="green")
我想知道我是否可以复制subset.psp的大部分功能，并且只是弄清楚如何更改功能的修剪部分。现在是无知的部分：我找不到subset.psp的源代码。我试过在GitHub和RStudio上搜索。
> spatstat:::subset.psp
Error in get(name, envir = asNamespace(pkg), inherits = FALSE) : object 'subset.psp' not found
> getAnywhere(subset.psp)
no object named ‘subset.psp’ was found
我已查看How can I view the source code for a function?，但我无法理解哪些命令适用于subset.psp。什么是正确的语法？
或者，我可以使用不同的功能或解决方法吗？