Publications by Juan Edu
Resenha
RESENHA Temos no texto testes estatísticos mostrando uma alta correlação entre votação regionalizada dos candidatos e reeleição. Como base nisso foram testados cinco conjuntos de variáveis empíricas que poderiam explicar a votação regionalizada. A primeira delas diz respeito a carreira do parlamentar, sendo composta por: partido a qu...
8852 sym
Trabalho 07
X ~ N(500,300) a) Pr(X<500) b) Pr(400<X<710) c) Pr(330<X<450) #X ~ N(500,300) #a) Pr(X<500) = Pr[(0-500)/300 < Z < (500-500)/300] = # Pr(-1,6<Z<0) = 0,44520 #b) Pr(400<X< 710) = Pr[(400 - 500)/300 < Z < (710-500)/300] = # Pr(-0,3<Z<0,7) = Pr(-0,3<z<0) +Pr(0<Z<0,7) = 0,11791 +0,25804 = 0,37595 #c) Pr(330<X<450) = Pr[(330-500)/300 < Z < (450-500)...
1012 sym
Trabalho 06
carregando base de dados library(readxl) FifaData <- read_excel("C:/Users/User/Downloads/FifaData.xls") View(FifaData) Diagrama de disperção plot(FifaData$Age, FifaData$Shot_Power, xlab = "Penalties", ylab = "Dribbling") criar matriz de correlação correlacao <- cor(FifaData[, c("Penalties", "Dribbling")]) Intepretação dos resultados Vemo...
302 sym R (232 sym/3 pcs) 1 img
Trabalho 05
# Bibliotecas library(readxl) ## Warning: package 'readxl' was built under R version 4.2.3 library(flextable) ## Warning: package 'flextable' was built under R version 4.2.3 library(dplyr) ## Warning: package 'dplyr' was built under R version 4.2.3 ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## #...
1060 sym R (1703 sym/15 pcs) 1 img 4 tbl
Trabalho 4
Carregar a biblioteca: library(electionsBR) ## ## To cite electionsBR in publications, use: citation('electionsBR') ## To learn more, visit: http://electionsbr.com library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:b...
500 sym R (3380 sym/15 pcs) 1 img
Terceiro trabalho de estatística
load("~/Base_de_dados-master/df_pokemon.RData") criando o conjunto de dados attack = c(49,62,82,52,64) defense = c(49,63,83,43,58) Calculando a média media_attack = mean(attack) media_defense = mean(defense) media_attack ## [1] 61.8 media_defense ## [1] 59.2 Calculando Desvio desvio_padrao_attack = sd(attack) desvio_padrao_defense = sd(de...
666 sym 2 img
Trabalho 2
#Base de dados library(readxl) QE <- read_excel("Base_de_dados-master/Questionario_Estresse.xls") View(QE) QE$Namorado_a = ifelse(QE$Namorado_a==1,"Namora","Solteiro") Podemos observar nesta tabela dos valores absolutos que dos 95 alunos, 47 namora e 48 são solteiros. #Tabela de valores absolutos tabela_Namorado = table(QE$Namorado_a) tabela_...
386 sym R (404 sym/8 pcs) 2 img
Benim meu país
Benin é um pequeno país localizado no oeste da África, seu território é banhado pelo golfo da Guiné e faz limites com Burkina Faso, Níger, Nigéria e Togo. Benin foi um dos maiores entrepostos de escravos entre os séculos XVII e XIX. Muitos deles foram trazidos para o Brasil, introduzindo elementos na cultura brasileira. A feijoada e ...
780 sym 2 img