MONTANDO ARQUIVO DE DADOS

feijao = read.table("https://raw.githubusercontent.com/leocbc/CursoR_iniciante/master/Arquivos/Modulo_2/feijao.txt", header = T)
head(feijao)
##   REP TRAT NDIF TP VC ACAM ST  P5V COMPV NGV PG5V  PROD
## 1   1   21   45  2  3    4 52 23.3 108.0  67 15.2 442.7
## 2   2   21   46  1  4    2 47 18.4  97.0  85 13.8 183.7
## 3   3   21   41  1  3    2 57 24.6 102.0  70 15.7 540.1
## 4   4   21   45  2  4    2 66 11.0  78.0  50  9.4 513.8
## 5   1   22   46  2  3    2 35 22.3  99.2  68 16.4 253.7
## 6   2   22   45  2  3    4 52 17.5  81.0  62 13.0  97.9

SUMARIZANDO OS DADOS

str(feijao)
## 'data.frame':    80 obs. of  12 variables:
##  $ REP  : int  1 2 3 4 1 2 3 4 1 2 ...
##  $ TRAT : int  21 21 21 21 22 22 22 22 23 23 ...
##  $ NDIF : int  45 46 41 45 46 45 45 45 45 46 ...
##  $ TP   : int  2 1 1 2 2 2 2 3 1 1 ...
##  $ VC   : int  3 4 3 4 3 3 3 2 4 4 ...
##  $ ACAM : int  4 2 2 2 2 4 4 3 2 2 ...
##  $ ST   : int  52 47 57 66 35 52 52 54 54 49 ...
##  $ P5V  : num  23.3 18.4 24.6 11 22.3 17.5 23.3 19.8 20.2 20.8 ...
##  $ COMPV: num  108 97 102 78 99.2 81 108 106 98.9 99 ...
##  $ NGV  : int  67 85 70 50 68 62 67 62 78 66 ...
##  $ PG5V : num  15.2 13.8 15.7 9.4 16.4 13 15.2 15 15.5 15.4 ...
##  $ PROD : num  443 184 540 514 254 ...
summary(feijao)
##       REP            TRAT            NDIF             TP              VC       
##  Min.   :1.00   Min.   :21.00   Min.   :37.00   Min.   :1.000   Min.   :2.000  
##  1st Qu.:1.75   1st Qu.:25.75   1st Qu.:40.00   1st Qu.:1.000   1st Qu.:3.000  
##  Median :2.50   Median :30.50   Median :40.00   Median :1.000   Median :3.000  
##  Mean   :2.50   Mean   :30.50   Mean   :41.08   Mean   :1.562   Mean   :3.025  
##  3rd Qu.:3.25   3rd Qu.:35.25   3rd Qu.:42.25   3rd Qu.:2.000   3rd Qu.:3.000  
##  Max.   :4.00   Max.   :40.00   Max.   :47.00   Max.   :3.000   Max.   :4.000  
##       ACAM             ST             P5V            COMPV       
##  Min.   :1.000   Min.   :20.00   Min.   :11.00   Min.   :  1.00  
##  1st Qu.:2.000   1st Qu.:37.25   1st Qu.:15.62   1st Qu.: 88.00  
##  Median :3.000   Median :48.50   Median :16.90   Median : 96.00  
##  Mean   :2.812   Mean   :46.67   Mean   :17.36   Mean   : 92.14  
##  3rd Qu.:3.000   3rd Qu.:57.00   3rd Qu.:19.02   3rd Qu.:100.00  
##  Max.   :5.000   Max.   :76.00   Max.   :24.60   Max.   :112.00  
##       NGV             PG5V             PROD       
##  Min.   :41.00   Min.   :  8.90   Min.   :  89.9  
##  1st Qu.:58.00   1st Qu.: 12.07   1st Qu.: 374.7  
##  Median :63.50   Median : 13.20   Median : 473.5  
##  Mean   :63.25   Mean   : 15.85   Mean   : 489.1  
##  3rd Qu.:68.00   3rd Qu.: 14.70   3rd Qu.: 616.8  
##  Max.   :85.00   Max.   :131.00   Max.   :1016.2

PLOTANDO HISTOGRAMA

hist(feijao$PROD)