Maio 2024 - R-br - DINF UFPR

[OFF -Tópic] Cotas em concursos para negros e índios!
by Andre Oliveira 12 Jun '49

12 Jun '49

Pessoal, tem um colegar meu que vou fazer um concurso ele é descendente de negro ele é pardo. Ele veio com a pergunta como provar que sou negro, pois, tem vagas reservada para negros e índios? Eu sinceramente não sei e não tenho ideia pois nunca tive esta curiosidade. O que de fato comprova sua raça? Algum documento? O que são usados em concursos para provar? obrigado André Oliveira Souza

5 6

Legenda eixo X
by Luciano F. Sgarbi 10 Jun '49

10 Jun '49

Prezados, Estou tentando centralizar a legenda do eixo X em uma figura com vários gráficos. Estou conseguindo centralizar a legenda da linha inferior como no exemplo, mas as linhas do meio não. par(mfrow=c(2,2)) plot(rnorm(100),xlab="",ylab="y1") plot(rnorm(100),xlab="",ylab="y2") mtext(side=1,cex=2,line=-1.8,text="Variável Explanatória 1",outer=TRUE) ### o problema está aqui, pois a legenda desce para a parte inferior da figura. plot(rnorm(100),xlab="",ylab="y1") plot(rnorm(100),xlab="",ylab="y2") mtext(side=1,cex=2,line=-1.8,text="Variável Explanatória 2",outer=TRUE)## Esse dá certo Alguém podia dar uma luz de como eu posso fazer isso? Abraços -- *Luciano F. Sgarbi* Mestrando em Ecologia e Evolução Laboratório de Ecologia de Insetos (sl. 222) Departamento de Ecologia Instituto de Ciências Biológicas - ICB 1 Universidade Federal de Goiás, campus II Goiânia-GO 74001-970 Brazil

2 2

ggplot2 geom_bar() argumento fill não retorna legendau
by Pedro Emmanuel Alvarenga Americano do Brasil 22 Mai '24

22 Mai '24

Salve salve irmãos de R, Estou batendo a cabeça pra acertar um gráfico de barras. Eu gostaria que houvesse um grupo de 6 barras (categorias) por visita, ou seja, em cada janela de visita houvesse 6 barras. Cada barra de uma cor pra poder fazer a legenda correspondente. E as barras precisariam corresponder com as frequências das categorias nas visitas. Acho que o problema é que há algumas categorias que são zero, mas elas deveriam aparecer no gráfico e na legenda mesmo assim. Mas quando eu consigo fazer as frequências, as cores ficam ruins e quando eu consigo aproximar as cores as frequências vão embora. O mais próximo que consegui foi assim: #Simulando o banco tab <- array(c(0,0,0,1,34,46,0,0,0,2,24,19,0,0,1,7,6,2), c(6,3)) dimnames(tab) <- list(c("Não informado","Definitivamente insatisfeito","Insatisfeito","Nem satisfeito, nem insatisfeito","Satisfeito","Definitivamente satisfeito"), c("Visita 2", "Visita 3", "Visita 4")) names(dimnames(tab)) <- c("Classificacao", "Visitas") tab df <- epitools::expand.table(tab) df levels(df$Classificacao) prop.table(table(df$Classificacao, df$Visitas),2) # O grafico ramp <- colorRampPalette(c("red","green")) library(tidyverse) ggplot(df, aes(x = Classificacao)) + facet_grid(cols = vars(Visitas)) + geom_bar(aes(y = after_stat(prop), fill = Classificacao, group = 1)) + scale_y_continuous(labels = scales::percent) + labs(y = "Percentual da satisfação", x = "", fill = "Satisfação") + # scale_x_discrete(drop = FALSE) + scale_fill_discrete(drop = FALSE) + scale_fill_manual(values = ramp(length(levels(df$Classificacao)))) # Abraço forte e que a força esteja sempre com voces. Pedro Brasil

2 4

Novo df e gráfico barras horizontal
by Amiko Bh 14 Mai '24

14 Mai '24

Pessoal: Do df: *SEXO* *COR* MASCULINO PRETA MASCULINO PARDA MASCULINO PARDA MASCULINO PARDA MASCULINO PARDA MASCULINO PARDA MASCULINO PARDA MASCULINO BRANCA FEMININO PARDA FEMININO PARDA FEMININO PARDA FEMININO PARDA FEMININO PRETA FEMININO PARDA Pretendo obter df2: *SEXO* *COR* *QUANTIDADE* MASCULINO PRETA 1 MASCULINO PARDA 6 MASCULINO BRANCA 1 FEMININO PARDA 5 FEMININO PRETA 1 E com o df2 - não sei se consigo diretamente com o df1 - obter um gráfico de barras horizontais. Estou apanhando até para conseguir...

3 4