Caros, boa tarde. Gostaria de tirar um dúvida. Estou preparando uma função básica e ela tem 3 objetos distintos de saída sendo um deles o resumo para o usuário e outros a informação linha por linha do arquivo de dados de entrada. O que gostaria de fazer é colocar estes dois últimos objetos escondidos na função de tal forma que quando o usuário rodasse só seria apresentado o resumo. Seria algo equivalente ao que o lm() faz. Se rodo o lm() só aparece o resumo, mas posso extrair os resíduos com o comando lm()$residuals . y <- rnorm(100) x <- rbinom(100,10,prob=.2) obj <- lm(y~x) names(obj) []s, Leandro
Não sei se estou falando besteira! Mas, acho que seria o caso de definir uma classe para esse caso! Procede? att, FH 2012/12/13 Leandro Marino <leandromarino@leandromarino.com.br>:
Caros,
boa tarde.
Gostaria de tirar um dúvida. Estou preparando uma função básica e ela tem 3 objetos distintos de saída sendo um deles o resumo para o usuário e outros a informação linha por linha do arquivo de dados de entrada.
O que gostaria de fazer é colocar estes dois últimos objetos escondidos na função de tal forma que quando o usuário rodasse só seria apresentado o resumo. Seria algo equivalente ao que o lm() faz. Se rodo o lm() só aparece o resumo, mas posso extrair os resíduos com o comando lm()$residuals .
y <- rnorm(100) x <- rbinom(100,10,prob=.2) obj <- lm(y~x) names(obj)
[]s, Leandro
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
Acho que o único jeito de fazer isso é criando uma classe e definindo o print dela. (o lm nada mais é do que uma lista) a <- list() a[[1]] <- rnorm(1:100) a[[2]] <- rnorm(1:100) a[[3]] <- lm(a[[1]] ~ a[[2]]) print.macaco <- function(x) { print(x[[3]]) } a class(a) <- 'macaco' a 2012/12/13 Leandro Marino <leandromarino@leandromarino.com.br>
Caros,
boa tarde.
Gostaria de tirar um dúvida. Estou preparando uma função básica e ela tem 3 objetos distintos de saída sendo um deles o resumo para o usuário e outros a informação linha por linha do arquivo de dados de entrada.
O que gostaria de fazer é colocar estes dois últimos objetos escondidos na função de tal forma que quando o usuário rodasse só seria apresentado o resumo. Seria algo equivalente ao que o lm() faz. Se rodo o lm() só aparece o resumo, mas posso extrair os resíduos com o comando lm()$residuals .
y <- rnorm(100) x <- rbinom(100,10,prob=.2) obj <- lm(y~x) names(obj)
[]s, Leandro
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
Crie uma classe (S3) e defina o método print []s Leonard de Assis http://about.me/ldeassis Em 13/12/2012 15:29, Leandro Marino escreveu:
Caros,
boa tarde.
Gostaria de tirar um dúvida. Estou preparando uma função básica e ela tem 3 objetos distintos de saída sendo um deles o resumo para o usuário e outros a informação linha por linha do arquivo de dados de entrada.
O que gostaria de fazer é colocar estes dois últimos objetos escondidos na função de tal forma que quando o usuário rodasse só seria apresentado o resumo. Seria algo equivalente ao que o lm() faz. Se rodo o lm() só aparece o resumo, mas posso extrair os resíduos com o comando lm()$residuals .
y <- rnorm(100) x <- rbinom(100,10,prob=.2) obj <- lm(y~x) names(obj)
[]s, Leandro
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
participantes (4)
-
FHRB Toledo -
Leandro Marino -
Leonard de Assis -
Rodrigo Coster