Walmes, veja se eh isso mylist2 <- lapply(mylist, table) sapply(names(mylist2), function(nm) barplot(mylist2[[nm]], main = nm))
[]s, --- Fernando Mayer Universidade Federal de Santa Catarina - UFSC Departamento de Ecologia e Zoologia - ECZ/CCB URL: http://sites.google.com/site/fernandomayer e-mail: fernandomayer [@] gmail.com 2012/6/8 Benilton Carvalho <[email protected]>: > Walmes, > > Não tenho como testar agora, mas eu faria > > sapply(names(mylist), function(x) barplot(mylist[[x]], main=x)) > > b > > > On Saturday, 9 June 2012, Walmes Zeviani wrote: >> >> Saudações, >> >> Estou fazendo análise descritiva de várias variáveis e gostaria de >> automatizar em parte o processo. Assim, uma lista contém cada variável como >> um elemento e eu gostaria de usar o nome do elemento da lista como título do >> gráfico. Veja o CMR >> >> mylist <- list(salario=sample(1:3,40,r=TRUE), >> dependentes=sample(1:3,40,r=TRUE)) >> par(mfrow=c(2,1)) >> sapply(mylist, function(x) barplot(table(x), main=deparse(substitute(x)))) >> for(i in names(mylist)) barplot(table(mylist[[i]]), main=i) >> >> Eu gostaria de pegar os nomes "salario" e "dependentes" e usá-los como >> titulo. Tentei várias combinações de parse(), deparse(), substitute(), etc. >> Quero evitar o for(). Alguma sugestão? >> >> Grato. >> Walmes. >> >> ========================================================================== >> Walmes Marques Zeviani >> LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W) >> Departamento de Estatística - Universidade Federal do Paraná >> fone: (+55) 41 3361 3573 >> VoIP: (3361 3600) 1053 1173 >> e-mail: [email protected] >> twitter: @walmeszeviani >> homepage: http://www.leg.ufpr.br/~walmes >> linux user number: 531218 >> ========================================================================== > > > _______________________________________________ > R-br mailing list > [email protected] > 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. _______________________________________________ R-br mailing list [email protected] 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.
