Publications by Ramon Lima de Oliveira Tavares
Análise Multivariada I (Universidade Estadual da Paraíba)
dados <- readxl::read_xlsx( "C:/Users/tavar/OneDrive/Área de Trabalho/multivariada/vinho.xlsx") dados <- dados %>% mutate(Clareza = as.factor(Clareza), Aroma = as.numeric(Aroma), Textura = as.numeric(Textura), Sabor = as.numeric(Sabor), Carvalho = as.numeric(Carvalho), Qualidade = as.numeri...
4554 sym 11 img
Questão 03 Lista II (Teste Exato de Fisher)
Exemplo 03 da lista II valores <- c(7,4,3,8) linhas <-2 colunas<-2 significancia = 0.01 #Matriz Principal matriz <-matrix(valores, nrow = linhas,ncol = colunas, byrow = TRUE) matriz_principal<-diag(matriz) matriz_secundaria <-diag(matriz[,ncol(matriz):1]) soma_linhas <- rowSums(matriz) soma_colunas <- colSums(matriz) total <- sum(soma_linha...
1669 sym
Atividade 04 Lista II (Aplicando Teste de Fisher para Análise com Banco de Dados)
Carrega o dataset df <- read.csv("C:/Users/tavar/OneDrive/Documentos/drug200.csv") df ## Age Sex BP Cholesterol Na_to_K Drug ## 1 23 F HIGH HIGH 25.355 DrugY ## 2 47 M LOW HIGH 13.093 drugC ## 3 47 M LOW HIGH 10.114 drugC ## 4 28 F NORMAL HIGH 7.798 drugX ## 5 61 F ...
1170 sym
Exemplo da questão 02 Lista II (Teste Qui-QUadrado)
Exemplo 02 da lista II valores <-c(294, 921, 98, 2862, 50, 3064, 203, 2652) linhas <- 4 colunas <- 2 p_valor = 0.01 Matriz principal bloco1 <-matrix(valores, nrow = linhas,ncol = colunas, byrow = T) soma_linha <- rowSums(bloco1) soma_coluna <- colSums(bloco1) total<-sum(bloco1) nova_coluna <- c(soma_linha,total) matriz_completa<- rbind(blo...
615 sym
Teste Qui-Quadrado para duas amostra independentes
Explicação passo a passo de cada linha de código que entrega todos os valores do teste Qui-Quadrado para duas amostras independentes. #INFORMAÇÕES NECESSÁRIA É APENAS INFORMAR OS VALORES DA MATRIZ, DO EXEMPLO QUE SE QUER OBTER RESPOSTA POR LINHA. valores <-c(14,94,4,97) #INFORMAR O NÚMERO DE LINHAS QUE TEM A MATRIZ linhas <- 2 #INFORMA...
262 sym
Teste exato de Fisher para tabelas 2x2
Explicação passo a passo do código criado para gerar todos os valores de cada fórmula do teste exato de Fisher para tabelas 2x2 #INFORMAÇÕES NECESSÁRIA É APENAS INFORMAR OS VALORES DA MATRIZ, DO EXEMPLO QUE SE QUER OBTER RESPOSTA POR LINHA. valores <- c(7,4,3,8) #INFORMAR O NÚMERO DE LINHAS QUE TEM A MATRIZ linhas <-2 #INFORMAR O NÚM...
250 sym
Questão 03 Lista II (Teste Exato de Fisher)
Exemplo 03 da lista II valores <- c(7,4,3,8) linhas <-2 colunas<-2 p_valor = 0.01 Matriz Principal matriz <-matrix(valores, nrow = linhas,ncol = colunas, byrow = TRUE) matriz_principal<-diag(matriz) matriz_secundaria <-diag(matriz[,ncol(matriz):1]) soma_linhas <- rowSums(matriz) soma_colunas <- colSums(matriz) total <- sum(soma_linhas) n...
1668 sym
Atividade 04 Lista II (Aplicando Teste de Fisher para Análise com Banco de Dados)
Carrega o dataset df <- read.csv("C:/Users/tavar/OneDrive/Documentos/drug200.csv") Discretiza a variável “Idade” em três categorias df$Idade <- cut(df$Age, breaks=c(0,30,50,100), labels=c("jovem", "meia-idade", "idoso")) Discretiza a variável “Sódio para Potássio” em três categorias df$sodio_para_potassio <- cut(df$Na_to_K, breaks=c...
222 sym
Estatística Não-Paramétrica (7° semestre)
FUNÇÃO QUE CALCULA O TESTE QUI-QUADRADO PARA 2 AMOSTRAS INDEPENDENTES Passo a passo comentado de cada linha do código valores <-c(14,94,4,97) linhas <- 2 colunas <- 2 p_valor = 0.05 #criando uma matriz com com os valores ordenado por linha bloco1 <-matrix(valores, nrow = linhas,ncol = colunas, byrow = T) # Soma de cada Linha soma_linha...
607 sym