Fevereiro 2020 - R-br

[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

Manter o R atualizado no linux mint 9.3
by Emerson Cotta Bodevan 24 Abr '20

24 Abr '20

Pessoal não estou obtendo sucesso para manter o R atualizado no linux mint 9.3. O que estou fazendo: Adicionei o repositório deb https://cran-r.c3sl.ufpr.br/bin/linux/ubuntu bionic-cran35/ pelo synaptic Quando pedi para recarregar aconteceu o seguinte erro ##### Não foi possível baixar todos os índices de repositórios O repositório pode não estar mais disponível ou pode não ter sido possível entrar em contato com o mesmo devido a problemas de rede. Caso esteja disponível, uma versão mais antiga do índice que falhou será usada. Senão o repositório será ignorado. Verifique sua conexão de rede e certifique-se de que o endereço do repositório esteja correto nas preferências. The repository 'https://cran-r.c3sl.ufpr.br/bin/linux/ubuntu bionic-cran35/ Release' does not have a Release file. ###### Depois disso minha intenção é instalar o pacote Rcmdr, pois com a versão atual do R 3.4.4 está ocorrendo o seguinte erro: #### > install.packages("Rcmdr") Installing package into ‘/home/ecbodevan/R/x86_64-pc-linux-gnu-library/3.4’ (as ‘lib’ is unspecified) Warning message: package ‘Rcmdr’ is not available (for R version 3.4.4) #### Alguém poderia me ajudar? *Emerson*

5 17

Script de função
by Luiz Leal 20 Fev '20

20 Fev '20

Prezados, boa noite.Como faço pra acessar o script desta função? > library(ellipse) > ellipse function (x, ...) UseMethod("ellipse") <bytecode: 0x00000000169e4040> <environment: namespace:ellipse> Desde já agradeço Luiz

2 1

ajuda com o R
by Dayana Alves da Silva 15 Fev '20

15 Fev '20

Estou tentando rodar uma analise discriminante com meus dados (Rodando uma LDA) e da o seguinte erro: in qr.default(D %*% ss[[nt]] %*% D, tol = tol) : NA/NaN/Inf em chamada de função externa (argumento 1) precisava ver se alguém no forum poderia me esclarecer isso Obrigada! -- Dayana Alves da Silva Cunha Universidade Estadual do Mato Grosso do Sul - UEMS Programa de Pós-graduação em Recursos Naturais - PGRN Rod. Dourados-Itaum, KM 12 – Bairro Aeroporto http://lattes.cnpq.br/3746386393452470

2 1

Identificar valores fora da elipse
by Luiz Leal 10 Fev '20

10 Fev '20

Prezados, como faço para criar um script que identifique que os laboratórios 7042 e 9541 estão fora da elipse.Os dados seguem em anexo.Desde já agradeço.Luiz # Dados setwd("F:\\") library(xlsx) dados=read.xlsx("Lab.xlsx" , sheetIndex=1,encoding="UTF-8") elipse=read.xlsx("elipse.xlsx" , sheetIndex=1,encoding="UTF-8") x=dados$x y=dados$y # Graph limitex = c( min(c(x,elipse[,1])), max(c(x,elipse[,1])) ) limitey = c( min(c(y,elipse[,2])), max(c(y,elipse[,2])) ) plot(x, y, type = "n", xlab = "", xlim = limitex, ylim = limitey, ylab = "", cex.axis = 1.3, cex.lab = 1.3) text(x, y, dados$Lab, font = 2, cex = 0.8) points(elipse, type = "l", col = "red")

2 1

knitr::kable() para pdf como aumentar o tamanho da fonte do caption?
by Paulo Eduardo de Mesquita 08 Fev '20

08 Fev '20

Olá pessoal, Paz e bem, O arquivo Rmd que segue anexo (e abaixo); produz um documento no formato pdf que contém a tabela exemplo ilustrada abaixo. Eu utilizei um template do pacote "rticles" que possui uma formatação esteticamente agradável. [image: T1.png] Contudo, o tamanho da fonte do caption da tabela é menor do que o tamanho da fonte no corpo da tabela o que, a meu ver, quebra a harmonia do documento e gera um desconforto cognitivo apreciável. Eu não sei onde é definido o tamanho da fonte do caption, talvez no template que eu utilizei (arquivo csl também segue anexo). Apesar de ter pesquisado bastante, não consegui encontrar solução que me permitisse realizar dois ajustes: (1) Trocar o "Table 1" por "Tabela 1" e aumentar o tamanho da fonte do caption. Agradeço as orientações que vocês possam me passar. Muito obrigado. -- Paulo Eduardo de Mesquita Disciplina de Infectologia - Faculdade de Medicina Universidade do Oeste Paulista Presidente Prudente - São Paulo - Brasil telefone: 5518 97718261 --- title: Planetary Statistics author: - name: Alice Anonymous email: alice(a)example.com affiliation: Some Institute of Technology footnote: 1 - name: Bob Security email: bob(a)example.com affiliation: Another University address: - code: Some Institute of Technology address: Department, Street, City, State, Zip - code: Another University address: Department, Street, City, State, Zip footnote: - code: 1 text: "Corresponding Author" - code: 2 text: "Equal contribution" journal: "An awesome journal" date: "`r Sys.Date()`" csl: elsevier-harvard.csl output: rticles::elsevier_article geometry: "left=3cm,right=2cm,top=2cm,bottom=2cm" --- ```{r 1, include = TRUE, message=FALSE, warning=FALSE} require(dplyr) require(knitr) require(kableExtra) require(rticles) Mercury <- c(57900000, 4878, 1416, 88, 0.38, 100, 0) Venus <- c(108160000, 12104, 5832, 224, 0.9, 480, 0) Earth <- c(149600000, 12756, 24, 365, 1, 14, 1) Mars <- c(227936640, 6794, 24, 687, 0.38, -63, 2) Jupiter <- c(778369000, 142984, 10, 4380, 2.64, -130, 79) Saturn <- c(1427034000, 120536, 11, 10585, 1.16, -130, 62) Uranus <- c(2870658186, 51118, 17, 30660, 1.11, -200, 27) Neptune <- c(4496976000, 49532, 16, 60225, 1.21, -200, 14) df <- rbind(Mercury, Venus, Earth, Mars, Jupiter, Saturn, Uranus, Neptune) colnames(df) <- c("DFS", "Diameter","Day","Year","Gravity","Temperature","Moons") kable(df, caption = "Planetary Statistics.", booktabs = T, linesep = "", align = "lcccccc", format = "latex") %>% kable_styling(bootstrap_options = "condensed", latex_options = "striped", stripe_color = "#D9D8D8") %>% kable_styling(font_size = 10) %>% kable_styling(latex_options = "HOLD_position") %>% footnote(alphabet = "https://www.bobthealien.co.uk/solarsystem/table.htm", alphabet_title = "Source:", footnote_as_chunk = T) %>% footnote(alphabet = "average temperature in oC", alphabet_title = "Temperature:", footnote_as_chunk = T) %>% footnote(alphabet = "ratio to Earth's gravity", alphabet_title = "Gravity:", footnote_as_chunk = T) %>% footnote(alphabet = "time to complete a full rotation around the sun in days", alphabet_title = "Year:", footnote_as_chunk = T) %>% footnote(alphabet = "time to complete a full rotation over its axis in hours", alphabet_title = "Day:", footnote_as_chunk = T) %>% footnote(alphabet = "in km", alphabet_title = "Diameter:", footnote_as_chunk = T) %>% footnote(alphabet = "distance from the sun in km", alphabet_title = "DFS:", footnote_as_chunk = T) ```

2 1

Criar numeração única para dados iguais
by Bárbara Mazetti Nascimento 08 Fev '20

08 Fev '20

Boa tarde pessoal! Sou nova no R e estou me batendo um pouco com algumas edições de banco de dados que era acostumada a fazer no SAS. Preciso criar uma coluna com uma nova identificação para uma variável que eu criei agrupando outras variáveis. Eu trabalho com dados de bovinos e criei o que chamamos de grupo de contemporâneos: animais que vivenciaram o mesmo ambiente. Então geralmente são animais nascidos no mesmo ano, no mesmo mês e na mesma propriedade. Então, por exemplo, temos os seguintes animais: Animal Ano de nascimento Mês de nascimento Fazenda A 2018 Oct 1 B 2018 Oct 1 C 2018 Oct 1 D 2018 Oct 2 E 2018 Oct 2 F 2018 Oct 2 G 2018 Nov 1 H 2018 Nov 1 I 2018 Nov 1 J 2018 Nov 1 Eu agrupei essas variáveis em uma que eu chamei de Grupo: Animal Grupo A 2018 Oct 1 B 2018 Oct 1 C 2018 Oct 1 D 2018 Oct 2 E 2018 Oct 2 F 2018 Oct 2 G 2018 Nov 1 H 2018 Nov 1 I 2018 Nov 1 J 2018 Nov 1 Agora preciso criar essa nova numeração, para que os animais que tenham o mesmo Grupo sejam chamados pelo mesmo número (GC). A saída que eu espero é a seguinte: Animal Grupo GC A 2018 Oct 1 1 B 2018 Oct 1 1 C 2018 Oct 1 1 D 2018 Oct 2 2 E 2018 Oct 2 2 F 2018 Oct 2 2 G 2018 Nov 1 3 H 2018 Nov 1 3 I 2018 Nov 1 3 J 2018 Nov 1 3 Será que vocês poderiam me ajudar em como eu consigo criar essa nova numeração? Muito obrigada!! Bárbara -- _____________________________________________________ MSc. Bárbara Mazetti Nascimento PhD student in Animal Science Genetic Applied to Animal Breeding Group - GAMA UFPR - Curitiba - PR - Brazil +55 41 99142-9495

3 2

Re: [R-br] knitr::kable() para pdf como aumentar o tamanho da fonte do caption?
by sznelwar＠uol.com.br 08 Fev '20

08 Fev '20

1 0

Script Entropia Bidimensional Padronizada
by Sarah Reis 07 Fev '20

07 Fev '20

Olá pessoal, Estou realizando análises em uma matriz de frequência de interações entre duas variáveis (ectoparasitas e hospedeiros). Com base em artigos de referência da área, li que a análise de Entropia Bidimensional Padronizada é utilizada para calcular essas interações no nível da rede. Porém, ainda estou no processo inicial de aprendizagem do R. Alguém já realizou esse tipo de análise e teria o script para fornecer? Desde já, muito obrigada pela tenção. Att., -- Sarah Fontes Reis Mestranda em Biologia Animal - UFV Bacharela em Ciências Biológicas - UFV Museu de Zoologia João Moojen Contato: (31)9-98993346 (wpp)

1 0