如何查看类的结构

gaoqinghui

本人正在做一个实证研究，用到了的package是ineq
在library(ineq)之后，里面有一个Lc函数

我想按照这个Lc函数自己写一个类似的函数
只见这个函数的定义如下（直接跳到这个函数的倒数那几行）
function (x, n = rep(1, length(x)), plot = FALSE)
{
    ina <- !is.na(x)
    n <- n[ina]
    x <- as.numeric(x)[ina]
    k <- length(x)
    o <- order(x)
    x <- x[o]
    n <- n[o]
    x <- n * x
    p <- cumsum(n)/sum(n)
    L <- cumsum(x)/sum(x)
    p <- c(0, p)
    L <- c(0, L)
    L2 <- L * mean(x)/mean(n)
    Lc <- list(p, L, L2)
    names(Lc) <- c("p", "L", "L.general")
    class(Lc) <- "Lc"
    if (plot)
        plot(Lc)
    Lc
}
<environment: namespace:ineq>


可以看到，有一个class(Lc)<- "Lc"
这里应该是把Lc的类型定义为Lc，我想写的函数也需要定义一个类似的类，正在我准备看Lc这个类的结构的时候，我发现怎么都查看不到，按照各种教科书的方法，什么unclass,edit,str,mode,这些都会把Lc看出是那个函数，而不是Lc这个类。

想问一下大家，在这种情况下，如何查看Lc这个类的结构，希望回答者可以把具体的操作过程和结果贴出来，万分感谢

gaoqinghui

有人知道怎么解决吗？感激不尽

gaoqinghui