Consultoria estatística para agronomia

Meu nome é Miklos Bajay, consultor sênior especializado em assessoria estatística para artigos científicos, trabalhos de conclusão de curso, dissertações de mestrado e teses de doutorados. Se você estiver precisando de apoio técnico para análise estatística do seu trabalho acadêmico, elaboramos um relatório estatístico, a partir da sua base de dados, com todas as análises descritivas, tabelas, gráficos, testes e modelos estatísticos utilizados para resolução do seu problema de pesquisa.

Inferência Estatística - Origem distribuição F (Snedecor)

## Objetivos específicos
##===============================================================================
## a) Plotar várias funções de densidade de probabilidade da distribuição F.
##    Sugere-se alterar a posição (numerador e denominador) da variável 'i'
##    na função df(x,
##                 i,
##                 20)
##===============================================================================

plot(NA,
     xlab='F',
     ylab='f(F)',
     xlim=c(0, 5),
     ylim=c(0, 1.2),
     type='n')


# Número de curvas
nc <- seq(1,
          5e1,
          by=1)

# Define as cores
cores <- rainbow(length(nc))              

for (i in nc)
{
  curve(df(x,
           i,
           20),
        col=cores[i], # Uma cor para cada curva
        add=TRUE,
        lwd=1)
}