Usando Dplyr

Actividad 1

set.seed(2074)

Biomasa = round(rnorm(120, mean = 5, sd = 0.85), 2) #gramos
Flores.r = rbinom(120, size = 20, prob = 0.8) #conteo flores en 3 ramas
Flores.d = rpois(120, lambda = 10.5) #conteo flores desprendidas
Hojas.d = sample.int(300, size = 120, replace = TRUE) #conteo hojas desprendidas


born = rbernoulli(p = 0.75,n =120)
Plaga = c()
contador = 0
 
for (i in born){
  contador = contador + 1
  if (i == TRUE){
    Plaga[contador] = "Presente"
  }else if (i == FALSE){
    Plaga[contador] = "Ausente"
  }
} #Haciendo la columna de Plaga

Estatus = gl(3, 40, 120,  labels = c("S", "PA", "MA")) #S=sana, PA=parcialmente afectada, MA=muy afectada

x <- runif(120, min = 0, max = 1.2)
Fertilizacion = if_else(x < 0.5, "FO", "FI") #Fertilización orgánica o inorgánica

Actividad 2

#2.1
tib.c = data.frame(Biomasa, Flores.r, Flores.d, Hojas.d, Plaga, Estatus, Fertilizacion) 

#2.2
dim(tib.c) 
## [1] 120   7
str(tib.c)
## 'data.frame':    120 obs. of  7 variables:
##  $ Biomasa      : num  5.65 4.74 5.86 5.24 4.38 5.41 5.14 5.98 3.97 7.14 ...
##  $ Flores.r     : int  14 17 18 18 16 18 15 16 14 16 ...
##  $ Flores.d     : int  11 6 16 13 8 13 11 10 11 8 ...
##  $ Hojas.d      : int  263 182 212 121 64 211 185 292 99 246 ...
##  $ Plaga        : chr  "Presente" "Presente" "Presente" "Presente" ...
##  $ Estatus      : Factor w/ 3 levels "S","PA","MA": 1 1 1 1 1 1 1 1 1 1 ...
##  $ Fertilizacion: chr  "FI" "FI" "FI" "FO" ...
class(tib.c)
## [1] "data.frame"
names(tib.c)
## [1] "Biomasa"       "Flores.r"      "Flores.d"      "Hojas.d"      
## [5] "Plaga"         "Estatus"       "Fertilizacion"
is.na(tib.c)
##        Biomasa Flores.r Flores.d Hojas.d Plaga Estatus Fertilizacion
##   [1,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [2,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [3,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [4,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [5,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [6,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [7,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [8,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##   [9,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [10,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [11,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [12,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [13,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [14,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [15,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [16,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [17,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [18,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [19,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [20,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [21,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [22,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [23,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [24,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [25,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [26,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [27,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [28,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [29,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [30,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [31,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [32,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [33,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [34,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [35,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [36,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [37,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [38,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [39,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [40,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [41,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [42,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [43,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [44,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [45,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [46,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [47,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [48,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [49,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [50,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [51,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [52,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [53,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [54,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [55,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [56,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [57,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [58,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [59,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [60,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [61,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [62,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [63,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [64,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [65,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [66,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [67,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [68,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [69,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [70,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [71,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [72,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [73,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [74,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [75,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [76,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [77,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [78,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [79,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [80,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [81,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [82,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [83,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [84,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [85,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [86,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [87,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [88,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [89,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [90,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [91,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [92,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [93,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [94,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [95,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [96,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [97,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [98,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
##  [99,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [100,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [101,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [102,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [103,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [104,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [105,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [106,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [107,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [108,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [109,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [110,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [111,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [112,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [113,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [114,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [115,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [116,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [117,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [118,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [119,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
## [120,]   FALSE    FALSE    FALSE   FALSE FALSE   FALSE         FALSE
View(tib.c) 

#2.3
tib.i = sample_n(tib.c, 90) 
dim(tib.i)
## [1] 90  7
tib.i$Biomasa[1] = NA
tib.i$Hojas.d[1] = NA

head(tib.i)
##   Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1      NA       15        9      NA  Ausente       S            FI
## 2    5.92       15        7     300  Ausente      PA            FO
## 3    3.78       14       12     120 Presente      PA            FI
## 4    5.65       14       11     263 Presente       S            FI
## 5    6.24       18        7      90 Presente      MA            FI
## 6    5.41       18       13     211 Presente       S            FI

Actividad 3

#3.1
tib.c %>%
  select(Biomasa)
##     Biomasa
## 1      5.65
## 2      4.74
## 3      5.86
## 4      5.24
## 5      4.38
## 6      5.41
## 7      5.14
## 8      5.98
## 9      3.97
## 10     7.14
## 11     3.77
## 12     5.91
## 13     5.12
## 14     6.01
## 15     4.59
## 16     5.11
## 17     4.72
## 18     5.10
## 19     4.40
## 20     6.46
## 21     4.35
## 22     3.49
## 23     5.74
## 24     4.46
## 25     5.00
## 26     4.87
## 27     4.22
## 28     3.87
## 29     4.65
## 30     5.02
## 31     5.59
## 32     4.47
## 33     4.87
## 34     6.84
## 35     5.43
## 36     5.02
## 37     5.24
## 38     6.74
## 39     5.70
## 40     5.78
## 41     5.20
## 42     3.98
## 43     5.84
## 44     5.80
## 45     5.23
## 46     4.29
## 47     6.58
## 48     4.03
## 49     5.48
## 50     3.58
## 51     5.15
## 52     5.57
## 53     5.92
## 54     4.90
## 55     5.12
## 56     4.83
## 57     5.26
## 58     5.63
## 59     4.67
## 60     3.78
## 61     4.15
## 62     5.55
## 63     5.52
## 64     4.70
## 65     4.36
## 66     6.03
## 67     5.45
## 68     5.08
## 69     3.12
## 70     3.90
## 71     4.04
## 72     5.00
## 73     6.41
## 74     3.99
## 75     5.90
## 76     5.74
## 77     4.80
## 78     6.52
## 79     3.81
## 80     6.73
## 81     4.87
## 82     6.24
## 83     6.45
## 84     5.01
## 85     4.53
## 86     5.36
## 87     4.84
## 88     5.63
## 89     4.76
## 90     4.05
## 91     3.86
## 92     6.28
## 93     4.37
## 94     3.46
## 95     5.62
## 96     3.62
## 97     5.39
## 98     5.44
## 99     5.67
## 100    5.41
## 101    6.24
## 102    6.44
## 103    5.37
## 104    5.16
## 105    5.23
## 106    3.90
## 107    5.36
## 108    4.50
## 109    4.28
## 110    6.22
## 111    7.30
## 112    3.57
## 113    5.37
## 114    5.05
## 115    4.59
## 116    4.67
## 117    5.69
## 118    4.54
## 119    5.69
## 120    5.18
#3.2
tib.c %>% 
 select(Flores.d:Estatus)
##     Flores.d Hojas.d    Plaga Estatus
## 1         11     263 Presente       S
## 2          6     182 Presente       S
## 3         16     212 Presente       S
## 4         13     121 Presente       S
## 5          8      64 Presente       S
## 6         13     211 Presente       S
## 7         11     185 Presente       S
## 8         10     292 Presente       S
## 9         11      99 Presente       S
## 10         8     246 Presente       S
## 11        10     137 Presente       S
## 12         9     123 Presente       S
## 13        10     184 Presente       S
## 14         7     182 Presente       S
## 15         8     130 Presente       S
## 16        11      15  Ausente       S
## 17         7     248 Presente       S
## 18         9     156  Ausente       S
## 19         7       3 Presente       S
## 20        11      17 Presente       S
## 21         9     234  Ausente       S
## 22        19     286  Ausente       S
## 23         9      32 Presente       S
## 24         9      22 Presente       S
## 25        15       2 Presente       S
## 26        13     287 Presente       S
## 27         8      72 Presente       S
## 28        10      27 Presente       S
## 29        11      42 Presente       S
## 30        13      40 Presente       S
## 31        11     244  Ausente       S
## 32        10      35 Presente       S
## 33         9     148  Ausente       S
## 34         6     133 Presente       S
## 35         5     186  Ausente       S
## 36        16      56 Presente       S
## 37        13     213 Presente       S
## 38         8      40 Presente       S
## 39        11     223 Presente       S
## 40        13     218  Ausente       S
## 41        13     233 Presente      PA
## 42         8     164  Ausente      PA
## 43        10     187 Presente      PA
## 44        15     118 Presente      PA
## 45         9     115 Presente      PA
## 46         8     104 Presente      PA
## 47        10     221  Ausente      PA
## 48         4     110 Presente      PA
## 49         9     262 Presente      PA
## 50         9     297 Presente      PA
## 51        10     275 Presente      PA
## 52        11     101 Presente      PA
## 53         7     300  Ausente      PA
## 54        10      80 Presente      PA
## 55         9     227 Presente      PA
## 56        14     207 Presente      PA
## 57        17     160  Ausente      PA
## 58        13     290  Ausente      PA
## 59        12     117 Presente      PA
## 60        12     120 Presente      PA
## 61        11     258 Presente      PA
## 62        14     286  Ausente      PA
## 63         5     169 Presente      PA
## 64        14      66 Presente      PA
## 65        14     159  Ausente      PA
## 66        11     245 Presente      PA
## 67        15     141 Presente      PA
## 68         6     156 Presente      PA
## 69        15      22 Presente      PA
## 70         7     207 Presente      PA
## 71         8      81 Presente      PA
## 72        10      48  Ausente      PA
## 73        18     167 Presente      PA
## 74        10      40 Presente      PA
## 75        13      80 Presente      PA
## 76        11     159 Presente      PA
## 77        13     232  Ausente      PA
## 78        11     278 Presente      PA
## 79         3      75 Presente      PA
## 80        11      27 Presente      PA
## 81        14     201 Presente      MA
## 82         8      21 Presente      MA
## 83        12     153  Ausente      MA
## 84         9      77  Ausente      MA
## 85        13     171  Ausente      MA
## 86        12     233 Presente      MA
## 87         7     176 Presente      MA
## 88         9     255 Presente      MA
## 89         9     201  Ausente      MA
## 90         8     177 Presente      MA
## 91         9     255 Presente      MA
## 92         9     214 Presente      MA
## 93        10     177 Presente      MA
## 94         9     134  Ausente      MA
## 95        14      67 Presente      MA
## 96         8     114  Ausente      MA
## 97         8      41 Presente      MA
## 98        12      11 Presente      MA
## 99        15     275 Presente      MA
## 100       12     187 Presente      MA
## 101        7      90 Presente      MA
## 102       14     178  Ausente      MA
## 103        4     246 Presente      MA
## 104       12      80 Presente      MA
## 105       11      32 Presente      MA
## 106       13     179 Presente      MA
## 107       15      22 Presente      MA
## 108       15     188  Ausente      MA
## 109        9     274  Ausente      MA
## 110       10      99  Ausente      MA
## 111        9       9 Presente      MA
## 112        8     283 Presente      MA
## 113       14      31 Presente      MA
## 114        5      89 Presente      MA
## 115       13      49 Presente      MA
## 116       12     149 Presente      MA
## 117        7      94 Presente      MA
## 118        6     180  Ausente      MA
## 119       13      72 Presente      MA
## 120        9      96 Presente      MA
#3.3
tib.c %>% 
  select(!(Flores.d:Estatus))
##     Biomasa Flores.r Fertilizacion
## 1      5.65       14            FI
## 2      4.74       17            FI
## 3      5.86       18            FI
## 4      5.24       18            FO
## 5      4.38       16            FI
## 6      5.41       18            FI
## 7      5.14       15            FI
## 8      5.98       16            FI
## 9      3.97       14            FO
## 10     7.14       16            FI
## 11     3.77       16            FO
## 12     5.91       16            FI
## 13     5.12       16            FI
## 14     6.01       16            FO
## 15     4.59       16            FO
## 16     5.11       16            FI
## 17     4.72       14            FI
## 18     5.10       18            FI
## 19     4.40       17            FO
## 20     6.46       18            FI
## 21     4.35       16            FI
## 22     3.49       17            FO
## 23     5.74       17            FO
## 24     4.46       15            FO
## 25     5.00       13            FI
## 26     4.87       14            FI
## 27     4.22       17            FO
## 28     3.87       15            FI
## 29     4.65       14            FO
## 30     5.02       16            FI
## 31     5.59       18            FI
## 32     4.47       14            FI
## 33     4.87       15            FI
## 34     6.84       17            FO
## 35     5.43       18            FO
## 36     5.02       17            FI
## 37     5.24       14            FO
## 38     6.74       16            FI
## 39     5.70       18            FO
## 40     5.78       16            FI
## 41     5.20       19            FO
## 42     3.98       14            FI
## 43     5.84       19            FI
## 44     5.80       12            FO
## 45     5.23       17            FI
## 46     4.29       17            FI
## 47     6.58       19            FI
## 48     4.03       18            FI
## 49     5.48       16            FI
## 50     3.58       14            FI
## 51     5.15       17            FO
## 52     5.57       15            FO
## 53     5.92       15            FO
## 54     4.90       18            FI
## 55     5.12       16            FI
## 56     4.83       17            FI
## 57     5.26       17            FI
## 58     5.63       15            FI
## 59     4.67       15            FO
## 60     3.78       14            FI
## 61     4.15       14            FI
## 62     5.55       15            FI
## 63     5.52       18            FI
## 64     4.70       18            FI
## 65     4.36       16            FO
## 66     6.03       14            FI
## 67     5.45       17            FI
## 68     5.08       16            FO
## 69     3.12       18            FI
## 70     3.90       16            FI
## 71     4.04       17            FO
## 72     5.00       16            FI
## 73     6.41       18            FI
## 74     3.99       16            FI
## 75     5.90       16            FI
## 76     5.74       16            FO
## 77     4.80       15            FI
## 78     6.52       15            FI
## 79     3.81       18            FO
## 80     6.73       16            FI
## 81     4.87       16            FO
## 82     6.24       16            FI
## 83     6.45       17            FI
## 84     5.01       16            FO
## 85     4.53       16            FO
## 86     5.36       16            FI
## 87     4.84       15            FI
## 88     5.63       14            FO
## 89     4.76       15            FI
## 90     4.05       16            FO
## 91     3.86       13            FI
## 92     6.28       19            FI
## 93     4.37       14            FI
## 94     3.46       17            FO
## 95     5.62       18            FO
## 96     3.62       14            FI
## 97     5.39       16            FI
## 98     5.44       17            FO
## 99     5.67       18            FO
## 100    5.41       14            FI
## 101    6.24       18            FI
## 102    6.44       17            FI
## 103    5.37       16            FI
## 104    5.16       16            FO
## 105    5.23       16            FO
## 106    3.90       14            FI
## 107    5.36       19            FO
## 108    4.50       18            FO
## 109    4.28       16            FO
## 110    6.22       14            FO
## 111    7.30       19            FO
## 112    3.57       15            FO
## 113    5.37       17            FO
## 114    5.05       18            FO
## 115    4.59       17            FI
## 116    4.67       18            FI
## 117    5.69       14            FI
## 118    4.54       18            FO
## 119    5.69       16            FI
## 120    5.18       16            FO
#3.4
tib.c %>% 
  select(!ends_with(".d"))
##     Biomasa Flores.r    Plaga Estatus Fertilizacion
## 1      5.65       14 Presente       S            FI
## 2      4.74       17 Presente       S            FI
## 3      5.86       18 Presente       S            FI
## 4      5.24       18 Presente       S            FO
## 5      4.38       16 Presente       S            FI
## 6      5.41       18 Presente       S            FI
## 7      5.14       15 Presente       S            FI
## 8      5.98       16 Presente       S            FI
## 9      3.97       14 Presente       S            FO
## 10     7.14       16 Presente       S            FI
## 11     3.77       16 Presente       S            FO
## 12     5.91       16 Presente       S            FI
## 13     5.12       16 Presente       S            FI
## 14     6.01       16 Presente       S            FO
## 15     4.59       16 Presente       S            FO
## 16     5.11       16  Ausente       S            FI
## 17     4.72       14 Presente       S            FI
## 18     5.10       18  Ausente       S            FI
## 19     4.40       17 Presente       S            FO
## 20     6.46       18 Presente       S            FI
## 21     4.35       16  Ausente       S            FI
## 22     3.49       17  Ausente       S            FO
## 23     5.74       17 Presente       S            FO
## 24     4.46       15 Presente       S            FO
## 25     5.00       13 Presente       S            FI
## 26     4.87       14 Presente       S            FI
## 27     4.22       17 Presente       S            FO
## 28     3.87       15 Presente       S            FI
## 29     4.65       14 Presente       S            FO
## 30     5.02       16 Presente       S            FI
## 31     5.59       18  Ausente       S            FI
## 32     4.47       14 Presente       S            FI
## 33     4.87       15  Ausente       S            FI
## 34     6.84       17 Presente       S            FO
## 35     5.43       18  Ausente       S            FO
## 36     5.02       17 Presente       S            FI
## 37     5.24       14 Presente       S            FO
## 38     6.74       16 Presente       S            FI
## 39     5.70       18 Presente       S            FO
## 40     5.78       16  Ausente       S            FI
## 41     5.20       19 Presente      PA            FO
## 42     3.98       14  Ausente      PA            FI
## 43     5.84       19 Presente      PA            FI
## 44     5.80       12 Presente      PA            FO
## 45     5.23       17 Presente      PA            FI
## 46     4.29       17 Presente      PA            FI
## 47     6.58       19  Ausente      PA            FI
## 48     4.03       18 Presente      PA            FI
## 49     5.48       16 Presente      PA            FI
## 50     3.58       14 Presente      PA            FI
## 51     5.15       17 Presente      PA            FO
## 52     5.57       15 Presente      PA            FO
## 53     5.92       15  Ausente      PA            FO
## 54     4.90       18 Presente      PA            FI
## 55     5.12       16 Presente      PA            FI
## 56     4.83       17 Presente      PA            FI
## 57     5.26       17  Ausente      PA            FI
## 58     5.63       15  Ausente      PA            FI
## 59     4.67       15 Presente      PA            FO
## 60     3.78       14 Presente      PA            FI
## 61     4.15       14 Presente      PA            FI
## 62     5.55       15  Ausente      PA            FI
## 63     5.52       18 Presente      PA            FI
## 64     4.70       18 Presente      PA            FI
## 65     4.36       16  Ausente      PA            FO
## 66     6.03       14 Presente      PA            FI
## 67     5.45       17 Presente      PA            FI
## 68     5.08       16 Presente      PA            FO
## 69     3.12       18 Presente      PA            FI
## 70     3.90       16 Presente      PA            FI
## 71     4.04       17 Presente      PA            FO
## 72     5.00       16  Ausente      PA            FI
## 73     6.41       18 Presente      PA            FI
## 74     3.99       16 Presente      PA            FI
## 75     5.90       16 Presente      PA            FI
## 76     5.74       16 Presente      PA            FO
## 77     4.80       15  Ausente      PA            FI
## 78     6.52       15 Presente      PA            FI
## 79     3.81       18 Presente      PA            FO
## 80     6.73       16 Presente      PA            FI
## 81     4.87       16 Presente      MA            FO
## 82     6.24       16 Presente      MA            FI
## 83     6.45       17  Ausente      MA            FI
## 84     5.01       16  Ausente      MA            FO
## 85     4.53       16  Ausente      MA            FO
## 86     5.36       16 Presente      MA            FI
## 87     4.84       15 Presente      MA            FI
## 88     5.63       14 Presente      MA            FO
## 89     4.76       15  Ausente      MA            FI
## 90     4.05       16 Presente      MA            FO
## 91     3.86       13 Presente      MA            FI
## 92     6.28       19 Presente      MA            FI
## 93     4.37       14 Presente      MA            FI
## 94     3.46       17  Ausente      MA            FO
## 95     5.62       18 Presente      MA            FO
## 96     3.62       14  Ausente      MA            FI
## 97     5.39       16 Presente      MA            FI
## 98     5.44       17 Presente      MA            FO
## 99     5.67       18 Presente      MA            FO
## 100    5.41       14 Presente      MA            FI
## 101    6.24       18 Presente      MA            FI
## 102    6.44       17  Ausente      MA            FI
## 103    5.37       16 Presente      MA            FI
## 104    5.16       16 Presente      MA            FO
## 105    5.23       16 Presente      MA            FO
## 106    3.90       14 Presente      MA            FI
## 107    5.36       19 Presente      MA            FO
## 108    4.50       18  Ausente      MA            FO
## 109    4.28       16  Ausente      MA            FO
## 110    6.22       14  Ausente      MA            FO
## 111    7.30       19 Presente      MA            FO
## 112    3.57       15 Presente      MA            FO
## 113    5.37       17 Presente      MA            FO
## 114    5.05       18 Presente      MA            FO
## 115    4.59       17 Presente      MA            FI
## 116    4.67       18 Presente      MA            FI
## 117    5.69       14 Presente      MA            FI
## 118    4.54       18  Ausente      MA            FO
## 119    5.69       16 Presente      MA            FI
## 120    5.18       16 Presente      MA            FO
#3.5
tib.c %>% 
  select(starts_with("Fl"))
##     Flores.r Flores.d
## 1         14       11
## 2         17        6
## 3         18       16
## 4         18       13
## 5         16        8
## 6         18       13
## 7         15       11
## 8         16       10
## 9         14       11
## 10        16        8
## 11        16       10
## 12        16        9
## 13        16       10
## 14        16        7
## 15        16        8
## 16        16       11
## 17        14        7
## 18        18        9
## 19        17        7
## 20        18       11
## 21        16        9
## 22        17       19
## 23        17        9
## 24        15        9
## 25        13       15
## 26        14       13
## 27        17        8
## 28        15       10
## 29        14       11
## 30        16       13
## 31        18       11
## 32        14       10
## 33        15        9
## 34        17        6
## 35        18        5
## 36        17       16
## 37        14       13
## 38        16        8
## 39        18       11
## 40        16       13
## 41        19       13
## 42        14        8
## 43        19       10
## 44        12       15
## 45        17        9
## 46        17        8
## 47        19       10
## 48        18        4
## 49        16        9
## 50        14        9
## 51        17       10
## 52        15       11
## 53        15        7
## 54        18       10
## 55        16        9
## 56        17       14
## 57        17       17
## 58        15       13
## 59        15       12
## 60        14       12
## 61        14       11
## 62        15       14
## 63        18        5
## 64        18       14
## 65        16       14
## 66        14       11
## 67        17       15
## 68        16        6
## 69        18       15
## 70        16        7
## 71        17        8
## 72        16       10
## 73        18       18
## 74        16       10
## 75        16       13
## 76        16       11
## 77        15       13
## 78        15       11
## 79        18        3
## 80        16       11
## 81        16       14
## 82        16        8
## 83        17       12
## 84        16        9
## 85        16       13
## 86        16       12
## 87        15        7
## 88        14        9
## 89        15        9
## 90        16        8
## 91        13        9
## 92        19        9
## 93        14       10
## 94        17        9
## 95        18       14
## 96        14        8
## 97        16        8
## 98        17       12
## 99        18       15
## 100       14       12
## 101       18        7
## 102       17       14
## 103       16        4
## 104       16       12
## 105       16       11
## 106       14       13
## 107       19       15
## 108       18       15
## 109       16        9
## 110       14       10
## 111       19        9
## 112       15        8
## 113       17       14
## 114       18        5
## 115       17       13
## 116       18       12
## 117       14        7
## 118       18        6
## 119       16       13
## 120       16        9
#3.6
tib.c %>% 
  select(starts_with("F") & ends_with(".d"))
##     Flores.d
## 1         11
## 2          6
## 3         16
## 4         13
## 5          8
## 6         13
## 7         11
## 8         10
## 9         11
## 10         8
## 11        10
## 12         9
## 13        10
## 14         7
## 15         8
## 16        11
## 17         7
## 18         9
## 19         7
## 20        11
## 21         9
## 22        19
## 23         9
## 24         9
## 25        15
## 26        13
## 27         8
## 28        10
## 29        11
## 30        13
## 31        11
## 32        10
## 33         9
## 34         6
## 35         5
## 36        16
## 37        13
## 38         8
## 39        11
## 40        13
## 41        13
## 42         8
## 43        10
## 44        15
## 45         9
## 46         8
## 47        10
## 48         4
## 49         9
## 50         9
## 51        10
## 52        11
## 53         7
## 54        10
## 55         9
## 56        14
## 57        17
## 58        13
## 59        12
## 60        12
## 61        11
## 62        14
## 63         5
## 64        14
## 65        14
## 66        11
## 67        15
## 68         6
## 69        15
## 70         7
## 71         8
## 72        10
## 73        18
## 74        10
## 75        13
## 76        11
## 77        13
## 78        11
## 79         3
## 80        11
## 81        14
## 82         8
## 83        12
## 84         9
## 85        13
## 86        12
## 87         7
## 88         9
## 89         9
## 90         8
## 91         9
## 92         9
## 93        10
## 94         9
## 95        14
## 96         8
## 97         8
## 98        12
## 99        15
## 100       12
## 101        7
## 102       14
## 103        4
## 104       12
## 105       11
## 106       13
## 107       15
## 108       15
## 109        9
## 110       10
## 111        9
## 112        8
## 113       14
## 114        5
## 115       13
## 116       12
## 117        7
## 118        6
## 119       13
## 120        9
#3.7
Var_estatus = tib.c %>% 
  select(Biomasa) %>% 
  group_by(tib.c$Estatus)
 
#3.8
tib.c %>% 
  arrange(desc(Var_estatus), by_group = TRUE) %>% 
  select(Biomasa, Estatus)
##     Biomasa Estatus
## 1      7.30      MA
## 2      7.14       S
## 3      6.84       S
## 4      6.74       S
## 5      6.73      PA
## 6      6.58      PA
## 7      6.52      PA
## 8      6.46       S
## 9      6.45      MA
## 10     6.44      MA
## 11     6.41      PA
## 12     6.28      MA
## 13     6.24      MA
## 14     6.24      MA
## 15     6.22      MA
## 16     6.03      PA
## 17     6.01       S
## 18     5.98       S
## 19     5.92      PA
## 20     5.91       S
## 21     5.90      PA
## 22     5.86       S
## 23     5.84      PA
## 24     5.80      PA
## 25     5.78       S
## 26     5.74      PA
## 27     5.74       S
## 28     5.70       S
## 29     5.69      MA
## 30     5.69      MA
## 31     5.67      MA
## 32     5.65       S
## 33     5.63      MA
## 34     5.63      PA
## 35     5.62      MA
## 36     5.59       S
## 37     5.57      PA
## 38     5.55      PA
## 39     5.52      PA
## 40     5.48      PA
## 41     5.45      PA
## 42     5.44      MA
## 43     5.43       S
## 44     5.41      MA
## 45     5.41       S
## 46     5.39      MA
## 47     5.37      MA
## 48     5.37      MA
## 49     5.36      MA
## 50     5.36      MA
## 51     5.26      PA
## 52     5.24       S
## 53     5.24       S
## 54     5.23      MA
## 55     5.23      PA
## 56     5.20      PA
## 57     5.18      MA
## 58     5.16      MA
## 59     5.15      PA
## 60     5.14       S
## 61     5.12      PA
## 62     5.12       S
## 63     5.11       S
## 64     5.10       S
## 65     5.08      PA
## 66     5.05      MA
## 67     5.02       S
## 68     5.02       S
## 69     5.01      MA
## 70     5.00      PA
## 71     5.00       S
## 72     4.90      PA
## 73     4.87      MA
## 74     4.87       S
## 75     4.87       S
## 76     4.84      MA
## 77     4.83      PA
## 78     4.80      PA
## 79     4.76      MA
## 80     4.74       S
## 81     4.72       S
## 82     4.70      PA
## 83     4.67      MA
## 84     4.67      PA
## 85     4.65       S
## 86     4.59      MA
## 87     4.59       S
## 88     4.54      MA
## 89     4.53      MA
## 90     4.50      MA
## 91     4.47       S
## 92     4.46       S
## 93     4.40       S
## 94     4.38       S
## 95     4.37      MA
## 96     4.36      PA
## 97     4.35       S
## 98     4.29      PA
## 99     4.28      MA
## 100    4.22       S
## 101    4.15      PA
## 102    4.05      MA
## 103    4.04      PA
## 104    4.03      PA
## 105    3.99      PA
## 106    3.98      PA
## 107    3.97       S
## 108    3.90      MA
## 109    3.90      PA
## 110    3.87       S
## 111    3.86      MA
## 112    3.81      PA
## 113    3.78      PA
## 114    3.77       S
## 115    3.62      MA
## 116    3.58      PA
## 117    3.57      MA
## 118    3.49       S
## 119    3.46      MA
## 120    3.12      PA
#3.9
tib.c %>% 
   filter(Estatus == "MA" ) %>% 
   group_by(Estatus) %>% 
   select(starts_with("Flores"))
## Adding missing grouping variables: `Estatus`
## # A tibble: 40 x 3
## # Groups:   Estatus [1]
##    Estatus Flores.r Flores.d
##    <fct>      <int>    <int>
##  1 MA            16       14
##  2 MA            16        8
##  3 MA            17       12
##  4 MA            16        9
##  5 MA            16       13
##  6 MA            16       12
##  7 MA            15        7
##  8 MA            14        9
##  9 MA            15        9
## 10 MA            16        8
## # ... with 30 more rows
#3.10
tib.c %>% 
  filter(Biomasa > "5")
##    Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1     5.65       14       11     263 Presente       S            FI
## 2     5.86       18       16     212 Presente       S            FI
## 3     5.24       18       13     121 Presente       S            FO
## 4     5.41       18       13     211 Presente       S            FI
## 5     5.14       15       11     185 Presente       S            FI
## 6     5.98       16       10     292 Presente       S            FI
## 7     7.14       16        8     246 Presente       S            FI
## 8     5.91       16        9     123 Presente       S            FI
## 9     5.12       16       10     184 Presente       S            FI
## 10    6.01       16        7     182 Presente       S            FO
## 11    5.11       16       11      15  Ausente       S            FI
## 12    5.10       18        9     156  Ausente       S            FI
## 13    6.46       18       11      17 Presente       S            FI
## 14    5.74       17        9      32 Presente       S            FO
## 15    5.02       16       13      40 Presente       S            FI
## 16    5.59       18       11     244  Ausente       S            FI
## 17    6.84       17        6     133 Presente       S            FO
## 18    5.43       18        5     186  Ausente       S            FO
## 19    5.02       17       16      56 Presente       S            FI
## 20    5.24       14       13     213 Presente       S            FO
## 21    6.74       16        8      40 Presente       S            FI
## 22    5.70       18       11     223 Presente       S            FO
## 23    5.78       16       13     218  Ausente       S            FI
## 24    5.20       19       13     233 Presente      PA            FO
## 25    5.84       19       10     187 Presente      PA            FI
## 26    5.80       12       15     118 Presente      PA            FO
## 27    5.23       17        9     115 Presente      PA            FI
## 28    6.58       19       10     221  Ausente      PA            FI
## 29    5.48       16        9     262 Presente      PA            FI
## 30    5.15       17       10     275 Presente      PA            FO
## 31    5.57       15       11     101 Presente      PA            FO
## 32    5.92       15        7     300  Ausente      PA            FO
## 33    5.12       16        9     227 Presente      PA            FI
## 34    5.26       17       17     160  Ausente      PA            FI
## 35    5.63       15       13     290  Ausente      PA            FI
## 36    5.55       15       14     286  Ausente      PA            FI
## 37    5.52       18        5     169 Presente      PA            FI
## 38    6.03       14       11     245 Presente      PA            FI
## 39    5.45       17       15     141 Presente      PA            FI
## 40    5.08       16        6     156 Presente      PA            FO
## 41    6.41       18       18     167 Presente      PA            FI
## 42    5.90       16       13      80 Presente      PA            FI
## 43    5.74       16       11     159 Presente      PA            FO
## 44    6.52       15       11     278 Presente      PA            FI
## 45    6.73       16       11      27 Presente      PA            FI
## 46    6.24       16        8      21 Presente      MA            FI
## 47    6.45       17       12     153  Ausente      MA            FI
## 48    5.01       16        9      77  Ausente      MA            FO
## 49    5.36       16       12     233 Presente      MA            FI
## 50    5.63       14        9     255 Presente      MA            FO
## 51    6.28       19        9     214 Presente      MA            FI
## 52    5.62       18       14      67 Presente      MA            FO
## 53    5.39       16        8      41 Presente      MA            FI
## 54    5.44       17       12      11 Presente      MA            FO
## 55    5.67       18       15     275 Presente      MA            FO
## 56    5.41       14       12     187 Presente      MA            FI
## 57    6.24       18        7      90 Presente      MA            FI
## 58    6.44       17       14     178  Ausente      MA            FI
## 59    5.37       16        4     246 Presente      MA            FI
## 60    5.16       16       12      80 Presente      MA            FO
## 61    5.23       16       11      32 Presente      MA            FO
## 62    5.36       19       15      22 Presente      MA            FO
## 63    6.22       14       10      99  Ausente      MA            FO
## 64    7.30       19        9       9 Presente      MA            FO
## 65    5.37       17       14      31 Presente      MA            FO
## 66    5.05       18        5      89 Presente      MA            FO
## 67    5.69       14        7      94 Presente      MA            FI
## 68    5.69       16       13      72 Presente      MA            FI
## 69    5.18       16        9      96 Presente      MA            FO
#3.11 
tib.c %>% 
  filter(Estatus == "PA" & Fertilizacion == "FO")
##    Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1     5.20       19       13     233 Presente      PA            FO
## 2     5.80       12       15     118 Presente      PA            FO
## 3     5.15       17       10     275 Presente      PA            FO
## 4     5.57       15       11     101 Presente      PA            FO
## 5     5.92       15        7     300  Ausente      PA            FO
## 6     4.67       15       12     117 Presente      PA            FO
## 7     4.36       16       14     159  Ausente      PA            FO
## 8     5.08       16        6     156 Presente      PA            FO
## 9     4.04       17        8      81 Presente      PA            FO
## 10    5.74       16       11     159 Presente      PA            FO
## 11    3.81       18        3      75 Presente      PA            FO
#3.12
tib.c %>% 
  filter(Estatus == "PA" | Fertilizacion == "FI")
##    Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1     5.65       14       11     263 Presente       S            FI
## 2     4.74       17        6     182 Presente       S            FI
## 3     5.86       18       16     212 Presente       S            FI
## 4     4.38       16        8      64 Presente       S            FI
## 5     5.41       18       13     211 Presente       S            FI
## 6     5.14       15       11     185 Presente       S            FI
## 7     5.98       16       10     292 Presente       S            FI
## 8     7.14       16        8     246 Presente       S            FI
## 9     5.91       16        9     123 Presente       S            FI
## 10    5.12       16       10     184 Presente       S            FI
## 11    5.11       16       11      15  Ausente       S            FI
## 12    4.72       14        7     248 Presente       S            FI
## 13    5.10       18        9     156  Ausente       S            FI
## 14    6.46       18       11      17 Presente       S            FI
## 15    4.35       16        9     234  Ausente       S            FI
## 16    5.00       13       15       2 Presente       S            FI
## 17    4.87       14       13     287 Presente       S            FI
## 18    3.87       15       10      27 Presente       S            FI
## 19    5.02       16       13      40 Presente       S            FI
## 20    5.59       18       11     244  Ausente       S            FI
## 21    4.47       14       10      35 Presente       S            FI
## 22    4.87       15        9     148  Ausente       S            FI
## 23    5.02       17       16      56 Presente       S            FI
## 24    6.74       16        8      40 Presente       S            FI
## 25    5.78       16       13     218  Ausente       S            FI
## 26    5.20       19       13     233 Presente      PA            FO
## 27    3.98       14        8     164  Ausente      PA            FI
## 28    5.84       19       10     187 Presente      PA            FI
## 29    5.80       12       15     118 Presente      PA            FO
## 30    5.23       17        9     115 Presente      PA            FI
## 31    4.29       17        8     104 Presente      PA            FI
## 32    6.58       19       10     221  Ausente      PA            FI
## 33    4.03       18        4     110 Presente      PA            FI
## 34    5.48       16        9     262 Presente      PA            FI
## 35    3.58       14        9     297 Presente      PA            FI
## 36    5.15       17       10     275 Presente      PA            FO
## 37    5.57       15       11     101 Presente      PA            FO
## 38    5.92       15        7     300  Ausente      PA            FO
## 39    4.90       18       10      80 Presente      PA            FI
## 40    5.12       16        9     227 Presente      PA            FI
## 41    4.83       17       14     207 Presente      PA            FI
## 42    5.26       17       17     160  Ausente      PA            FI
## 43    5.63       15       13     290  Ausente      PA            FI
## 44    4.67       15       12     117 Presente      PA            FO
## 45    3.78       14       12     120 Presente      PA            FI
## 46    4.15       14       11     258 Presente      PA            FI
## 47    5.55       15       14     286  Ausente      PA            FI
## 48    5.52       18        5     169 Presente      PA            FI
## 49    4.70       18       14      66 Presente      PA            FI
## 50    4.36       16       14     159  Ausente      PA            FO
## 51    6.03       14       11     245 Presente      PA            FI
## 52    5.45       17       15     141 Presente      PA            FI
## 53    5.08       16        6     156 Presente      PA            FO
## 54    3.12       18       15      22 Presente      PA            FI
## 55    3.90       16        7     207 Presente      PA            FI
## 56    4.04       17        8      81 Presente      PA            FO
## 57    5.00       16       10      48  Ausente      PA            FI
## 58    6.41       18       18     167 Presente      PA            FI
## 59    3.99       16       10      40 Presente      PA            FI
## 60    5.90       16       13      80 Presente      PA            FI
## 61    5.74       16       11     159 Presente      PA            FO
## 62    4.80       15       13     232  Ausente      PA            FI
## 63    6.52       15       11     278 Presente      PA            FI
## 64    3.81       18        3      75 Presente      PA            FO
## 65    6.73       16       11      27 Presente      PA            FI
## 66    6.24       16        8      21 Presente      MA            FI
## 67    6.45       17       12     153  Ausente      MA            FI
## 68    5.36       16       12     233 Presente      MA            FI
## 69    4.84       15        7     176 Presente      MA            FI
## 70    4.76       15        9     201  Ausente      MA            FI
## 71    3.86       13        9     255 Presente      MA            FI
## 72    6.28       19        9     214 Presente      MA            FI
## 73    4.37       14       10     177 Presente      MA            FI
## 74    3.62       14        8     114  Ausente      MA            FI
## 75    5.39       16        8      41 Presente      MA            FI
## 76    5.41       14       12     187 Presente      MA            FI
## 77    6.24       18        7      90 Presente      MA            FI
## 78    6.44       17       14     178  Ausente      MA            FI
## 79    5.37       16        4     246 Presente      MA            FI
## 80    3.90       14       13     179 Presente      MA            FI
## 81    4.59       17       13      49 Presente      MA            FI
## 82    4.67       18       12     149 Presente      MA            FI
## 83    5.69       14        7      94 Presente      MA            FI
## 84    5.69       16       13      72 Presente      MA            FI
#3.13
tib.c %>%
  select(Flores.d, Plaga) %>% 
  filter(Plaga == "Presente" | Plaga == "Ausente") %>% 
  filter(Flores.d > median(Flores.d)) 
##    Flores.d    Plaga
## 1        11 Presente
## 2        16 Presente
## 3        13 Presente
## 4        13 Presente
## 5        11 Presente
## 6        11 Presente
## 7        11  Ausente
## 8        11 Presente
## 9        19  Ausente
## 10       15 Presente
## 11       13 Presente
## 12       11 Presente
## 13       13 Presente
## 14       11  Ausente
## 15       16 Presente
## 16       13 Presente
## 17       11 Presente
## 18       13  Ausente
## 19       13 Presente
## 20       15 Presente
## 21       11 Presente
## 22       14 Presente
## 23       17  Ausente
## 24       13  Ausente
## 25       12 Presente
## 26       12 Presente
## 27       11 Presente
## 28       14  Ausente
## 29       14 Presente
## 30       14  Ausente
## 31       11 Presente
## 32       15 Presente
## 33       15 Presente
## 34       18 Presente
## 35       13 Presente
## 36       11 Presente
## 37       13  Ausente
## 38       11 Presente
## 39       11 Presente
## 40       14 Presente
## 41       12  Ausente
## 42       13  Ausente
## 43       12 Presente
## 44       14 Presente
## 45       12 Presente
## 46       15 Presente
## 47       12 Presente
## 48       14  Ausente
## 49       12 Presente
## 50       11 Presente
## 51       13 Presente
## 52       15 Presente
## 53       15  Ausente
## 54       14 Presente
## 55       13 Presente
## 56       12 Presente
## 57       13 Presente
#3.14  
tib.i %>% 
  select(Biomasa, Plaga) %>% 
  filter(Biomasa > median(Biomasa), na.rm = TRUE) 
## [1] Biomasa Plaga  
## <0 rows> (or 0-length row.names)
tib.c%>%
  select(Plaga, Biomasa)%>%
  filter(Plaga=="Ausente")%>%
  filter(Biomasa>median(Biomasa))
##      Plaga Biomasa
## 1  Ausente    5.11
## 2  Ausente    5.10
## 3  Ausente    5.59
## 4  Ausente    5.43
## 5  Ausente    5.78
## 6  Ausente    6.58
## 7  Ausente    5.92
## 8  Ausente    5.26
## 9  Ausente    5.63
## 10 Ausente    5.55
## 11 Ausente    6.45
## 12 Ausente    5.01
## 13 Ausente    6.44
## 14 Ausente    6.22
tib.i%>%
  select(Plaga, Biomasa)%>%
  filter(Plaga=="Ausente")%>%
  filter(Biomasa>median(Biomasa), na.rm = TRUE)
## [1] Plaga   Biomasa
## <0 rows> (or 0-length row.names)
tib.c%>%
  select(Plaga, Biomasa)%>%
  filter(Plaga=="Presente")%>%
  filter(Biomasa>median(Biomasa))
##       Plaga Biomasa
## 1  Presente    5.65
## 2  Presente    5.86
## 3  Presente    5.24
## 4  Presente    5.41
## 5  Presente    5.98
## 6  Presente    7.14
## 7  Presente    5.91
## 8  Presente    6.01
## 9  Presente    6.46
## 10 Presente    5.74
## 11 Presente    6.84
## 12 Presente    5.24
## 13 Presente    6.74
## 14 Presente    5.70
## 15 Presente    5.20
## 16 Presente    5.84
## 17 Presente    5.80
## 18 Presente    5.23
## 19 Presente    5.48
## 20 Presente    5.57
## 21 Presente    5.52
## 22 Presente    6.03
## 23 Presente    5.45
## 24 Presente    6.41
## 25 Presente    5.90
## 26 Presente    5.74
## 27 Presente    6.52
## 28 Presente    6.73
## 29 Presente    6.24
## 30 Presente    5.36
## 31 Presente    5.63
## 32 Presente    6.28
## 33 Presente    5.62
## 34 Presente    5.39
## 35 Presente    5.44
## 36 Presente    5.67
## 37 Presente    5.41
## 38 Presente    6.24
## 39 Presente    5.37
## 40 Presente    5.23
## 41 Presente    5.36
## 42 Presente    7.30
## 43 Presente    5.37
## 44 Presente    5.69
## 45 Presente    5.69
## 46 Presente    5.18
tib.i%>%
  select(Plaga, Biomasa)%>%
  filter(Plaga=="Presente")%>%
  filter(Biomasa>median(Biomasa), na.rm = TRUE)
##       Plaga Biomasa
## 1  Presente    5.65
## 2  Presente    6.24
## 3  Presente    5.41
## 4  Presente    5.23
## 5  Presente    5.86
## 6  Presente    5.41
## 7  Presente    5.39
## 8  Presente    7.30
## 9  Presente    5.36
## 10 Presente    6.03
## 11 Presente    5.52
## 12 Presente    5.45
## 13 Presente    5.24
## 14 Presente    5.23
## 15 Presente    5.74
## 16 Presente    5.24
## 17 Presente    6.46
## 18 Presente    5.90
## 19 Presente    5.37
## 20 Presente    5.37
## 21 Presente    5.91
## 22 Presente    5.84
## 23 Presente    5.20
## 24 Presente    5.67
## 25 Presente    7.14
## 26 Presente    6.24
## 27 Presente    5.57
## 28 Presente    6.28
## 29 Presente    5.48
## 30 Presente    6.84
## 31 Presente    6.52
## 32 Presente    6.74

#Actividad 4

#4.1
v1= c("Flores.d","Hojas.d")
v2= c(quantile(tib.c$Flores.d,0.25),quantile(tib.c$Hojas.d,0.75))

tib.i %>% 
  filter(.[v1[1]]>v2[1],.[v1[2]]>v2[2] )
##    Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1     5.65       14       11     263 Presente       S            FI
## 2     5.36       16       12     233 Presente      MA            FI
## 3     6.03       14       11     245 Presente      PA            FI
## 4     4.28       16        9     274  Ausente      MA            FO
## 5     3.49       17       19     286  Ausente       S            FO
## 6     4.15       14       11     258 Presente      PA            FI
## 7     4.35       16        9     234  Ausente       S            FI
## 8     4.80       15       13     232  Ausente      PA            FI
## 9     4.87       14       13     287 Presente       S            FI
## 10    3.58       14        9     297 Presente      PA            FI
## 11    5.63       15       13     290  Ausente      PA            FI
## 12    5.78       16       13     218  Ausente       S            FI
## 13    5.20       19       13     233 Presente      PA            FO
## 14    5.67       18       15     275 Presente      MA            FO
## 15    6.58       19       10     221  Ausente      PA            FI
## 16    5.48       16        9     262 Presente      PA            FI
## 17    6.52       15       11     278 Presente      PA            FI
## 18    5.59       18       11     244  Ausente       S            FI
## 19    5.55       15       14     286  Ausente      PA            FI
#4.2
tib.e = tib.c %>% 
mutate(Biomasaz = (Biomasa - mean(Biomasa)/sd(Biomasa)),
       Floresmm.r = (Flores.r - min(Flores.r))/ range(Flores.r),
       Floresmm.d = (Flores.d - min(Flores.d))/ range(Flores.d),
       Hojasmm.d = (Hojas.d - min(Hojas.d))/ range(Hojas.d)) #Estandarización score Z y minimax

#4.3
DivF = Flores.r/Flores.d #variable para tib.c donde divida el número de flores en las ramas con el número de flores desprendidas.
tib.c<-cbind(tib.c,DivF)

#4.4
tib.c %>% 
  group_by(Plaga) %>% 
  select(DivF) %>% 
  mutate(rangomin = min_rank(desc(DivF))) #Variable rangomin
## Adding missing grouping variables: `Plaga`
## # A tibble: 120 x 3
## # Groups:   Plaga [2]
##    Plaga     DivF rangomin
##    <chr>    <dbl>    <int>
##  1 Presente  1.27       67
##  2 Presente  2.83        6
##  3 Presente  1.12       85
##  4 Presente  1.38       57
##  5 Presente  2          19
##  6 Presente  1.38       57
##  7 Presente  1.36       59
##  8 Presente  1.6        41
##  9 Presente  1.27       67
## 10 Presente  2          19
## # ... with 110 more rows
#4.5
rename(tib.e, Fmm.r = Floresmm.r, Fmm.d = Floresmm.d, F.d = Flores.d, F.r = Flores.r) #Renombrando variables asociadas a flores
##     Biomasa F.r F.d Hojas.d    Plaga Estatus Fertilizacion    Biomasaz
## 1      5.65  14  11     263 Presente       S            FI -0.23192764
## 2      4.74  17   6     182 Presente       S            FI -1.14192764
## 3      5.86  18  16     212 Presente       S            FI -0.02192764
## 4      5.24  18  13     121 Presente       S            FO -0.64192764
## 5      4.38  16   8      64 Presente       S            FI -1.50192764
## 6      5.41  18  13     211 Presente       S            FI -0.47192764
## 7      5.14  15  11     185 Presente       S            FI -0.74192764
## 8      5.98  16  10     292 Presente       S            FI  0.09807236
## 9      3.97  14  11      99 Presente       S            FO -1.91192764
## 10     7.14  16   8     246 Presente       S            FI  1.25807236
## 11     3.77  16  10     137 Presente       S            FO -2.11192764
## 12     5.91  16   9     123 Presente       S            FI  0.02807236
## 13     5.12  16  10     184 Presente       S            FI -0.76192764
## 14     6.01  16   7     182 Presente       S            FO  0.12807236
## 15     4.59  16   8     130 Presente       S            FO -1.29192764
## 16     5.11  16  11      15  Ausente       S            FI -0.77192764
## 17     4.72  14   7     248 Presente       S            FI -1.16192764
## 18     5.10  18   9     156  Ausente       S            FI -0.78192764
## 19     4.40  17   7       3 Presente       S            FO -1.48192764
## 20     6.46  18  11      17 Presente       S            FI  0.57807236
## 21     4.35  16   9     234  Ausente       S            FI -1.53192764
## 22     3.49  17  19     286  Ausente       S            FO -2.39192764
## 23     5.74  17   9      32 Presente       S            FO -0.14192764
## 24     4.46  15   9      22 Presente       S            FO -1.42192764
## 25     5.00  13  15       2 Presente       S            FI -0.88192764
## 26     4.87  14  13     287 Presente       S            FI -1.01192764
## 27     4.22  17   8      72 Presente       S            FO -1.66192764
## 28     3.87  15  10      27 Presente       S            FI -2.01192764
## 29     4.65  14  11      42 Presente       S            FO -1.23192764
## 30     5.02  16  13      40 Presente       S            FI -0.86192764
## 31     5.59  18  11     244  Ausente       S            FI -0.29192764
## 32     4.47  14  10      35 Presente       S            FI -1.41192764
## 33     4.87  15   9     148  Ausente       S            FI -1.01192764
## 34     6.84  17   6     133 Presente       S            FO  0.95807236
## 35     5.43  18   5     186  Ausente       S            FO -0.45192764
## 36     5.02  17  16      56 Presente       S            FI -0.86192764
## 37     5.24  14  13     213 Presente       S            FO -0.64192764
## 38     6.74  16   8      40 Presente       S            FI  0.85807236
## 39     5.70  18  11     223 Presente       S            FO -0.18192764
## 40     5.78  16  13     218  Ausente       S            FI -0.10192764
## 41     5.20  19  13     233 Presente      PA            FO -0.68192764
## 42     3.98  14   8     164  Ausente      PA            FI -1.90192764
## 43     5.84  19  10     187 Presente      PA            FI -0.04192764
## 44     5.80  12  15     118 Presente      PA            FO -0.08192764
## 45     5.23  17   9     115 Presente      PA            FI -0.65192764
## 46     4.29  17   8     104 Presente      PA            FI -1.59192764
## 47     6.58  19  10     221  Ausente      PA            FI  0.69807236
## 48     4.03  18   4     110 Presente      PA            FI -1.85192764
## 49     5.48  16   9     262 Presente      PA            FI -0.40192764
## 50     3.58  14   9     297 Presente      PA            FI -2.30192764
## 51     5.15  17  10     275 Presente      PA            FO -0.73192764
## 52     5.57  15  11     101 Presente      PA            FO -0.31192764
## 53     5.92  15   7     300  Ausente      PA            FO  0.03807236
## 54     4.90  18  10      80 Presente      PA            FI -0.98192764
## 55     5.12  16   9     227 Presente      PA            FI -0.76192764
## 56     4.83  17  14     207 Presente      PA            FI -1.05192764
## 57     5.26  17  17     160  Ausente      PA            FI -0.62192764
## 58     5.63  15  13     290  Ausente      PA            FI -0.25192764
## 59     4.67  15  12     117 Presente      PA            FO -1.21192764
## 60     3.78  14  12     120 Presente      PA            FI -2.10192764
## 61     4.15  14  11     258 Presente      PA            FI -1.73192764
## 62     5.55  15  14     286  Ausente      PA            FI -0.33192764
## 63     5.52  18   5     169 Presente      PA            FI -0.36192764
## 64     4.70  18  14      66 Presente      PA            FI -1.18192764
## 65     4.36  16  14     159  Ausente      PA            FO -1.52192764
## 66     6.03  14  11     245 Presente      PA            FI  0.14807236
## 67     5.45  17  15     141 Presente      PA            FI -0.43192764
## 68     5.08  16   6     156 Presente      PA            FO -0.80192764
## 69     3.12  18  15      22 Presente      PA            FI -2.76192764
## 70     3.90  16   7     207 Presente      PA            FI -1.98192764
## 71     4.04  17   8      81 Presente      PA            FO -1.84192764
## 72     5.00  16  10      48  Ausente      PA            FI -0.88192764
## 73     6.41  18  18     167 Presente      PA            FI  0.52807236
## 74     3.99  16  10      40 Presente      PA            FI -1.89192764
## 75     5.90  16  13      80 Presente      PA            FI  0.01807236
## 76     5.74  16  11     159 Presente      PA            FO -0.14192764
## 77     4.80  15  13     232  Ausente      PA            FI -1.08192764
## 78     6.52  15  11     278 Presente      PA            FI  0.63807236
## 79     3.81  18   3      75 Presente      PA            FO -2.07192764
## 80     6.73  16  11      27 Presente      PA            FI  0.84807236
## 81     4.87  16  14     201 Presente      MA            FO -1.01192764
## 82     6.24  16   8      21 Presente      MA            FI  0.35807236
## 83     6.45  17  12     153  Ausente      MA            FI  0.56807236
## 84     5.01  16   9      77  Ausente      MA            FO -0.87192764
## 85     4.53  16  13     171  Ausente      MA            FO -1.35192764
## 86     5.36  16  12     233 Presente      MA            FI -0.52192764
## 87     4.84  15   7     176 Presente      MA            FI -1.04192764
## 88     5.63  14   9     255 Presente      MA            FO -0.25192764
## 89     4.76  15   9     201  Ausente      MA            FI -1.12192764
## 90     4.05  16   8     177 Presente      MA            FO -1.83192764
## 91     3.86  13   9     255 Presente      MA            FI -2.02192764
## 92     6.28  19   9     214 Presente      MA            FI  0.39807236
## 93     4.37  14  10     177 Presente      MA            FI -1.51192764
## 94     3.46  17   9     134  Ausente      MA            FO -2.42192764
## 95     5.62  18  14      67 Presente      MA            FO -0.26192764
## 96     3.62  14   8     114  Ausente      MA            FI -2.26192764
## 97     5.39  16   8      41 Presente      MA            FI -0.49192764
## 98     5.44  17  12      11 Presente      MA            FO -0.44192764
## 99     5.67  18  15     275 Presente      MA            FO -0.21192764
## 100    5.41  14  12     187 Presente      MA            FI -0.47192764
## 101    6.24  18   7      90 Presente      MA            FI  0.35807236
## 102    6.44  17  14     178  Ausente      MA            FI  0.55807236
## 103    5.37  16   4     246 Presente      MA            FI -0.51192764
## 104    5.16  16  12      80 Presente      MA            FO -0.72192764
## 105    5.23  16  11      32 Presente      MA            FO -0.65192764
## 106    3.90  14  13     179 Presente      MA            FI -1.98192764
## 107    5.36  19  15      22 Presente      MA            FO -0.52192764
## 108    4.50  18  15     188  Ausente      MA            FO -1.38192764
## 109    4.28  16   9     274  Ausente      MA            FO -1.60192764
## 110    6.22  14  10      99  Ausente      MA            FO  0.33807236
## 111    7.30  19   9       9 Presente      MA            FO  1.41807236
## 112    3.57  15   8     283 Presente      MA            FO -2.31192764
## 113    5.37  17  14      31 Presente      MA            FO -0.51192764
## 114    5.05  18   5      89 Presente      MA            FO -0.83192764
## 115    4.59  17  13      49 Presente      MA            FI -1.29192764
## 116    4.67  18  12     149 Presente      MA            FI -1.21192764
## 117    5.69  14   7      94 Presente      MA            FI -0.19192764
## 118    4.54  18   6     180  Ausente      MA            FO -1.34192764
## 119    5.69  16  13      72 Presente      MA            FI -0.19192764
## 120    5.18  16   9      96 Presente      MA            FO -0.70192764
##          Fmm.r      Fmm.d    Hojasmm.d
## 1   0.16666667 2.66666667 130.50000000
## 2   0.26315789 0.15789474   0.60000000
## 3   0.50000000 4.33333333 105.00000000
## 4   0.31578947 0.52631579   0.39666667
## 5   0.33333333 1.66666667  31.00000000
## 6   0.31578947 0.52631579   0.69666667
## 7   0.25000000 2.66666667  91.50000000
## 8   0.21052632 0.36842105   0.96666667
## 9   0.16666667 2.66666667  48.50000000
## 10  0.21052632 0.26315789   0.81333333
## 11  0.33333333 2.33333333  67.50000000
## 12  0.21052632 0.31578947   0.40333333
## 13  0.33333333 2.33333333  91.00000000
## 14  0.21052632 0.21052632   0.60000000
## 15  0.33333333 1.66666667  64.00000000
## 16  0.21052632 0.42105263   0.04333333
## 17  0.16666667 1.33333333 123.00000000
## 18  0.31578947 0.31578947   0.51333333
## 19  0.41666667 1.33333333   0.50000000
## 20  0.31578947 0.42105263   0.05000000
## 21  0.33333333 2.00000000 116.00000000
## 22  0.26315789 0.84210526   0.94666667
## 23  0.41666667 2.00000000  15.00000000
## 24  0.15789474 0.31578947   0.06666667
## 25  0.08333333 4.00000000   0.00000000
## 26  0.10526316 0.52631579   0.95000000
## 27  0.41666667 1.66666667  35.00000000
## 28  0.15789474 0.36842105   0.08333333
## 29  0.16666667 2.66666667  20.00000000
## 30  0.21052632 0.52631579   0.12666667
## 31  0.50000000 2.66666667 121.00000000
## 32  0.10526316 0.36842105   0.11000000
## 33  0.25000000 2.00000000  73.00000000
## 34  0.26315789 0.15789474   0.43666667
## 35  0.50000000 0.66666667  92.00000000
## 36  0.26315789 0.68421053   0.18000000
## 37  0.16666667 3.33333333 105.50000000
## 38  0.21052632 0.26315789   0.12666667
## 39  0.50000000 2.66666667 110.50000000
## 40  0.21052632 0.52631579   0.72000000
## 41  0.58333333 3.33333333 115.50000000
## 42  0.10526316 0.26315789   0.54000000
## 43  0.58333333 2.33333333  92.50000000
## 44  0.00000000 0.63157895   0.38666667
## 45  0.41666667 2.00000000  56.50000000
## 46  0.26315789 0.26315789   0.34000000
## 47  0.58333333 2.33333333 109.50000000
## 48  0.31578947 0.05263158   0.36000000
## 49  0.33333333 2.00000000 130.00000000
## 50  0.10526316 0.31578947   0.98333333
## 51  0.41666667 2.33333333 136.50000000
## 52  0.15789474 0.42105263   0.33000000
## 53  0.25000000 1.33333333 149.00000000
## 54  0.31578947 0.36842105   0.26000000
## 55  0.33333333 2.00000000 112.50000000
## 56  0.26315789 0.57894737   0.68333333
## 57  0.41666667 4.66666667  79.00000000
## 58  0.15789474 0.52631579   0.96000000
## 59  0.25000000 3.00000000  57.50000000
## 60  0.10526316 0.47368421   0.39333333
## 61  0.16666667 2.66666667 128.00000000
## 62  0.15789474 0.57894737   0.94666667
## 63  0.50000000 0.66666667  83.50000000
## 64  0.31578947 0.57894737   0.21333333
## 65  0.33333333 3.66666667  78.50000000
## 66  0.10526316 0.42105263   0.81000000
## 67  0.41666667 4.00000000  69.50000000
## 68  0.21052632 0.15789474   0.51333333
## 69  0.50000000 4.00000000  10.00000000
## 70  0.21052632 0.21052632   0.68333333
## 71  0.41666667 1.66666667  39.50000000
## 72  0.21052632 0.36842105   0.15333333
## 73  0.50000000 5.00000000  82.50000000
## 74  0.21052632 0.36842105   0.12666667
## 75  0.33333333 3.33333333  39.00000000
## 76  0.21052632 0.42105263   0.52333333
## 77  0.25000000 3.33333333 115.00000000
## 78  0.15789474 0.42105263   0.92000000
## 79  0.50000000 0.00000000  36.50000000
## 80  0.21052632 0.42105263   0.08333333
## 81  0.33333333 3.66666667  99.50000000
## 82  0.21052632 0.26315789   0.06333333
## 83  0.41666667 3.00000000  75.50000000
## 84  0.21052632 0.31578947   0.25000000
## 85  0.33333333 3.33333333  84.50000000
## 86  0.21052632 0.47368421   0.77000000
## 87  0.25000000 1.33333333  87.00000000
## 88  0.10526316 0.31578947   0.84333333
## 89  0.25000000 2.00000000  99.50000000
## 90  0.21052632 0.26315789   0.58333333
## 91  0.08333333 2.00000000 126.50000000
## 92  0.36842105 0.31578947   0.70666667
## 93  0.16666667 2.33333333  87.50000000
## 94  0.26315789 0.31578947   0.44000000
## 95  0.50000000 3.66666667  32.50000000
## 96  0.10526316 0.26315789   0.37333333
## 97  0.33333333 1.66666667  19.50000000
## 98  0.26315789 0.47368421   0.03000000
## 99  0.50000000 4.00000000 136.50000000
## 100 0.10526316 0.47368421   0.61666667
## 101 0.50000000 1.33333333  44.00000000
## 102 0.26315789 0.57894737   0.58666667
## 103 0.33333333 0.33333333 122.00000000
## 104 0.21052632 0.47368421   0.26000000
## 105 0.33333333 2.66666667  15.00000000
## 106 0.10526316 0.52631579   0.59000000
## 107 0.58333333 4.00000000  10.00000000
## 108 0.31578947 0.63157895   0.62000000
## 109 0.33333333 2.00000000 136.00000000
## 110 0.10526316 0.36842105   0.32333333
## 111 0.58333333 2.00000000   3.50000000
## 112 0.15789474 0.26315789   0.93666667
## 113 0.41666667 3.66666667  14.50000000
## 114 0.31578947 0.10526316   0.29000000
## 115 0.41666667 3.33333333  23.50000000
## 116 0.31578947 0.47368421   0.49000000
## 117 0.16666667 1.33333333  46.00000000
## 118 0.31578947 0.15789474   0.59333333
## 119 0.33333333 3.33333333  35.00000000
## 120 0.21052632 0.31578947   0.31333333
#4.6
rename_with(tib.e, toupper) # Pase a mayúsculas todos los nombres de las variables en cualquier tibble.
##     BIOMASA FLORES.R FLORES.D HOJAS.D    PLAGA ESTATUS FERTILIZACION
## 1      5.65       14       11     263 Presente       S            FI
## 2      4.74       17        6     182 Presente       S            FI
## 3      5.86       18       16     212 Presente       S            FI
## 4      5.24       18       13     121 Presente       S            FO
## 5      4.38       16        8      64 Presente       S            FI
## 6      5.41       18       13     211 Presente       S            FI
## 7      5.14       15       11     185 Presente       S            FI
## 8      5.98       16       10     292 Presente       S            FI
## 9      3.97       14       11      99 Presente       S            FO
## 10     7.14       16        8     246 Presente       S            FI
## 11     3.77       16       10     137 Presente       S            FO
## 12     5.91       16        9     123 Presente       S            FI
## 13     5.12       16       10     184 Presente       S            FI
## 14     6.01       16        7     182 Presente       S            FO
## 15     4.59       16        8     130 Presente       S            FO
## 16     5.11       16       11      15  Ausente       S            FI
## 17     4.72       14        7     248 Presente       S            FI
## 18     5.10       18        9     156  Ausente       S            FI
## 19     4.40       17        7       3 Presente       S            FO
## 20     6.46       18       11      17 Presente       S            FI
## 21     4.35       16        9     234  Ausente       S            FI
## 22     3.49       17       19     286  Ausente       S            FO
## 23     5.74       17        9      32 Presente       S            FO
## 24     4.46       15        9      22 Presente       S            FO
## 25     5.00       13       15       2 Presente       S            FI
## 26     4.87       14       13     287 Presente       S            FI
## 27     4.22       17        8      72 Presente       S            FO
## 28     3.87       15       10      27 Presente       S            FI
## 29     4.65       14       11      42 Presente       S            FO
## 30     5.02       16       13      40 Presente       S            FI
## 31     5.59       18       11     244  Ausente       S            FI
## 32     4.47       14       10      35 Presente       S            FI
## 33     4.87       15        9     148  Ausente       S            FI
## 34     6.84       17        6     133 Presente       S            FO
## 35     5.43       18        5     186  Ausente       S            FO
## 36     5.02       17       16      56 Presente       S            FI
## 37     5.24       14       13     213 Presente       S            FO
## 38     6.74       16        8      40 Presente       S            FI
## 39     5.70       18       11     223 Presente       S            FO
## 40     5.78       16       13     218  Ausente       S            FI
## 41     5.20       19       13     233 Presente      PA            FO
## 42     3.98       14        8     164  Ausente      PA            FI
## 43     5.84       19       10     187 Presente      PA            FI
## 44     5.80       12       15     118 Presente      PA            FO
## 45     5.23       17        9     115 Presente      PA            FI
## 46     4.29       17        8     104 Presente      PA            FI
## 47     6.58       19       10     221  Ausente      PA            FI
## 48     4.03       18        4     110 Presente      PA            FI
## 49     5.48       16        9     262 Presente      PA            FI
## 50     3.58       14        9     297 Presente      PA            FI
## 51     5.15       17       10     275 Presente      PA            FO
## 52     5.57       15       11     101 Presente      PA            FO
## 53     5.92       15        7     300  Ausente      PA            FO
## 54     4.90       18       10      80 Presente      PA            FI
## 55     5.12       16        9     227 Presente      PA            FI
## 56     4.83       17       14     207 Presente      PA            FI
## 57     5.26       17       17     160  Ausente      PA            FI
## 58     5.63       15       13     290  Ausente      PA            FI
## 59     4.67       15       12     117 Presente      PA            FO
## 60     3.78       14       12     120 Presente      PA            FI
## 61     4.15       14       11     258 Presente      PA            FI
## 62     5.55       15       14     286  Ausente      PA            FI
## 63     5.52       18        5     169 Presente      PA            FI
## 64     4.70       18       14      66 Presente      PA            FI
## 65     4.36       16       14     159  Ausente      PA            FO
## 66     6.03       14       11     245 Presente      PA            FI
## 67     5.45       17       15     141 Presente      PA            FI
## 68     5.08       16        6     156 Presente      PA            FO
## 69     3.12       18       15      22 Presente      PA            FI
## 70     3.90       16        7     207 Presente      PA            FI
## 71     4.04       17        8      81 Presente      PA            FO
## 72     5.00       16       10      48  Ausente      PA            FI
## 73     6.41       18       18     167 Presente      PA            FI
## 74     3.99       16       10      40 Presente      PA            FI
## 75     5.90       16       13      80 Presente      PA            FI
## 76     5.74       16       11     159 Presente      PA            FO
## 77     4.80       15       13     232  Ausente      PA            FI
## 78     6.52       15       11     278 Presente      PA            FI
## 79     3.81       18        3      75 Presente      PA            FO
## 80     6.73       16       11      27 Presente      PA            FI
## 81     4.87       16       14     201 Presente      MA            FO
## 82     6.24       16        8      21 Presente      MA            FI
## 83     6.45       17       12     153  Ausente      MA            FI
## 84     5.01       16        9      77  Ausente      MA            FO
## 85     4.53       16       13     171  Ausente      MA            FO
## 86     5.36       16       12     233 Presente      MA            FI
## 87     4.84       15        7     176 Presente      MA            FI
## 88     5.63       14        9     255 Presente      MA            FO
## 89     4.76       15        9     201  Ausente      MA            FI
## 90     4.05       16        8     177 Presente      MA            FO
## 91     3.86       13        9     255 Presente      MA            FI
## 92     6.28       19        9     214 Presente      MA            FI
## 93     4.37       14       10     177 Presente      MA            FI
## 94     3.46       17        9     134  Ausente      MA            FO
## 95     5.62       18       14      67 Presente      MA            FO
## 96     3.62       14        8     114  Ausente      MA            FI
## 97     5.39       16        8      41 Presente      MA            FI
## 98     5.44       17       12      11 Presente      MA            FO
## 99     5.67       18       15     275 Presente      MA            FO
## 100    5.41       14       12     187 Presente      MA            FI
## 101    6.24       18        7      90 Presente      MA            FI
## 102    6.44       17       14     178  Ausente      MA            FI
## 103    5.37       16        4     246 Presente      MA            FI
## 104    5.16       16       12      80 Presente      MA            FO
## 105    5.23       16       11      32 Presente      MA            FO
## 106    3.90       14       13     179 Presente      MA            FI
## 107    5.36       19       15      22 Presente      MA            FO
## 108    4.50       18       15     188  Ausente      MA            FO
## 109    4.28       16        9     274  Ausente      MA            FO
## 110    6.22       14       10      99  Ausente      MA            FO
## 111    7.30       19        9       9 Presente      MA            FO
## 112    3.57       15        8     283 Presente      MA            FO
## 113    5.37       17       14      31 Presente      MA            FO
## 114    5.05       18        5      89 Presente      MA            FO
## 115    4.59       17       13      49 Presente      MA            FI
## 116    4.67       18       12     149 Presente      MA            FI
## 117    5.69       14        7      94 Presente      MA            FI
## 118    4.54       18        6     180  Ausente      MA            FO
## 119    5.69       16       13      72 Presente      MA            FI
## 120    5.18       16        9      96 Presente      MA            FO
##        BIOMASAZ FLORESMM.R FLORESMM.D    HOJASMM.D
## 1   -0.23192764 0.16666667 2.66666667 130.50000000
## 2   -1.14192764 0.26315789 0.15789474   0.60000000
## 3   -0.02192764 0.50000000 4.33333333 105.00000000
## 4   -0.64192764 0.31578947 0.52631579   0.39666667
## 5   -1.50192764 0.33333333 1.66666667  31.00000000
## 6   -0.47192764 0.31578947 0.52631579   0.69666667
## 7   -0.74192764 0.25000000 2.66666667  91.50000000
## 8    0.09807236 0.21052632 0.36842105   0.96666667
## 9   -1.91192764 0.16666667 2.66666667  48.50000000
## 10   1.25807236 0.21052632 0.26315789   0.81333333
## 11  -2.11192764 0.33333333 2.33333333  67.50000000
## 12   0.02807236 0.21052632 0.31578947   0.40333333
## 13  -0.76192764 0.33333333 2.33333333  91.00000000
## 14   0.12807236 0.21052632 0.21052632   0.60000000
## 15  -1.29192764 0.33333333 1.66666667  64.00000000
## 16  -0.77192764 0.21052632 0.42105263   0.04333333
## 17  -1.16192764 0.16666667 1.33333333 123.00000000
## 18  -0.78192764 0.31578947 0.31578947   0.51333333
## 19  -1.48192764 0.41666667 1.33333333   0.50000000
## 20   0.57807236 0.31578947 0.42105263   0.05000000
## 21  -1.53192764 0.33333333 2.00000000 116.00000000
## 22  -2.39192764 0.26315789 0.84210526   0.94666667
## 23  -0.14192764 0.41666667 2.00000000  15.00000000
## 24  -1.42192764 0.15789474 0.31578947   0.06666667
## 25  -0.88192764 0.08333333 4.00000000   0.00000000
## 26  -1.01192764 0.10526316 0.52631579   0.95000000
## 27  -1.66192764 0.41666667 1.66666667  35.00000000
## 28  -2.01192764 0.15789474 0.36842105   0.08333333
## 29  -1.23192764 0.16666667 2.66666667  20.00000000
## 30  -0.86192764 0.21052632 0.52631579   0.12666667
## 31  -0.29192764 0.50000000 2.66666667 121.00000000
## 32  -1.41192764 0.10526316 0.36842105   0.11000000
## 33  -1.01192764 0.25000000 2.00000000  73.00000000
## 34   0.95807236 0.26315789 0.15789474   0.43666667
## 35  -0.45192764 0.50000000 0.66666667  92.00000000
## 36  -0.86192764 0.26315789 0.68421053   0.18000000
## 37  -0.64192764 0.16666667 3.33333333 105.50000000
## 38   0.85807236 0.21052632 0.26315789   0.12666667
## 39  -0.18192764 0.50000000 2.66666667 110.50000000
## 40  -0.10192764 0.21052632 0.52631579   0.72000000
## 41  -0.68192764 0.58333333 3.33333333 115.50000000
## 42  -1.90192764 0.10526316 0.26315789   0.54000000
## 43  -0.04192764 0.58333333 2.33333333  92.50000000
## 44  -0.08192764 0.00000000 0.63157895   0.38666667
## 45  -0.65192764 0.41666667 2.00000000  56.50000000
## 46  -1.59192764 0.26315789 0.26315789   0.34000000
## 47   0.69807236 0.58333333 2.33333333 109.50000000
## 48  -1.85192764 0.31578947 0.05263158   0.36000000
## 49  -0.40192764 0.33333333 2.00000000 130.00000000
## 50  -2.30192764 0.10526316 0.31578947   0.98333333
## 51  -0.73192764 0.41666667 2.33333333 136.50000000
## 52  -0.31192764 0.15789474 0.42105263   0.33000000
## 53   0.03807236 0.25000000 1.33333333 149.00000000
## 54  -0.98192764 0.31578947 0.36842105   0.26000000
## 55  -0.76192764 0.33333333 2.00000000 112.50000000
## 56  -1.05192764 0.26315789 0.57894737   0.68333333
## 57  -0.62192764 0.41666667 4.66666667  79.00000000
## 58  -0.25192764 0.15789474 0.52631579   0.96000000
## 59  -1.21192764 0.25000000 3.00000000  57.50000000
## 60  -2.10192764 0.10526316 0.47368421   0.39333333
## 61  -1.73192764 0.16666667 2.66666667 128.00000000
## 62  -0.33192764 0.15789474 0.57894737   0.94666667
## 63  -0.36192764 0.50000000 0.66666667  83.50000000
## 64  -1.18192764 0.31578947 0.57894737   0.21333333
## 65  -1.52192764 0.33333333 3.66666667  78.50000000
## 66   0.14807236 0.10526316 0.42105263   0.81000000
## 67  -0.43192764 0.41666667 4.00000000  69.50000000
## 68  -0.80192764 0.21052632 0.15789474   0.51333333
## 69  -2.76192764 0.50000000 4.00000000  10.00000000
## 70  -1.98192764 0.21052632 0.21052632   0.68333333
## 71  -1.84192764 0.41666667 1.66666667  39.50000000
## 72  -0.88192764 0.21052632 0.36842105   0.15333333
## 73   0.52807236 0.50000000 5.00000000  82.50000000
## 74  -1.89192764 0.21052632 0.36842105   0.12666667
## 75   0.01807236 0.33333333 3.33333333  39.00000000
## 76  -0.14192764 0.21052632 0.42105263   0.52333333
## 77  -1.08192764 0.25000000 3.33333333 115.00000000
## 78   0.63807236 0.15789474 0.42105263   0.92000000
## 79  -2.07192764 0.50000000 0.00000000  36.50000000
## 80   0.84807236 0.21052632 0.42105263   0.08333333
## 81  -1.01192764 0.33333333 3.66666667  99.50000000
## 82   0.35807236 0.21052632 0.26315789   0.06333333
## 83   0.56807236 0.41666667 3.00000000  75.50000000
## 84  -0.87192764 0.21052632 0.31578947   0.25000000
## 85  -1.35192764 0.33333333 3.33333333  84.50000000
## 86  -0.52192764 0.21052632 0.47368421   0.77000000
## 87  -1.04192764 0.25000000 1.33333333  87.00000000
## 88  -0.25192764 0.10526316 0.31578947   0.84333333
## 89  -1.12192764 0.25000000 2.00000000  99.50000000
## 90  -1.83192764 0.21052632 0.26315789   0.58333333
## 91  -2.02192764 0.08333333 2.00000000 126.50000000
## 92   0.39807236 0.36842105 0.31578947   0.70666667
## 93  -1.51192764 0.16666667 2.33333333  87.50000000
## 94  -2.42192764 0.26315789 0.31578947   0.44000000
## 95  -0.26192764 0.50000000 3.66666667  32.50000000
## 96  -2.26192764 0.10526316 0.26315789   0.37333333
## 97  -0.49192764 0.33333333 1.66666667  19.50000000
## 98  -0.44192764 0.26315789 0.47368421   0.03000000
## 99  -0.21192764 0.50000000 4.00000000 136.50000000
## 100 -0.47192764 0.10526316 0.47368421   0.61666667
## 101  0.35807236 0.50000000 1.33333333  44.00000000
## 102  0.55807236 0.26315789 0.57894737   0.58666667
## 103 -0.51192764 0.33333333 0.33333333 122.00000000
## 104 -0.72192764 0.21052632 0.47368421   0.26000000
## 105 -0.65192764 0.33333333 2.66666667  15.00000000
## 106 -1.98192764 0.10526316 0.52631579   0.59000000
## 107 -0.52192764 0.58333333 4.00000000  10.00000000
## 108 -1.38192764 0.31578947 0.63157895   0.62000000
## 109 -1.60192764 0.33333333 2.00000000 136.00000000
## 110  0.33807236 0.10526316 0.36842105   0.32333333
## 111  1.41807236 0.58333333 2.00000000   3.50000000
## 112 -2.31192764 0.15789474 0.26315789   0.93666667
## 113 -0.51192764 0.41666667 3.66666667  14.50000000
## 114 -0.83192764 0.31578947 0.10526316   0.29000000
## 115 -1.29192764 0.41666667 3.33333333  23.50000000
## 116 -1.21192764 0.31578947 0.47368421   0.49000000
## 117 -0.19192764 0.16666667 1.33333333  46.00000000
## 118 -1.34192764 0.31578947 0.15789474   0.59333333
## 119 -0.19192764 0.33333333 3.33333333  35.00000000
## 120 -0.70192764 0.21052632 0.31578947   0.31333333
#4.7
rename_with(tib.e,~tolower(gsub(".d","_d",.x,fixed = TRUE)))
##     biomasa flores.r flores_d hojas_d    plaga estatus fertilizacion
## 1      5.65       14       11     263 Presente       S            FI
## 2      4.74       17        6     182 Presente       S            FI
## 3      5.86       18       16     212 Presente       S            FI
## 4      5.24       18       13     121 Presente       S            FO
## 5      4.38       16        8      64 Presente       S            FI
## 6      5.41       18       13     211 Presente       S            FI
## 7      5.14       15       11     185 Presente       S            FI
## 8      5.98       16       10     292 Presente       S            FI
## 9      3.97       14       11      99 Presente       S            FO
## 10     7.14       16        8     246 Presente       S            FI
## 11     3.77       16       10     137 Presente       S            FO
## 12     5.91       16        9     123 Presente       S            FI
## 13     5.12       16       10     184 Presente       S            FI
## 14     6.01       16        7     182 Presente       S            FO
## 15     4.59       16        8     130 Presente       S            FO
## 16     5.11       16       11      15  Ausente       S            FI
## 17     4.72       14        7     248 Presente       S            FI
## 18     5.10       18        9     156  Ausente       S            FI
## 19     4.40       17        7       3 Presente       S            FO
## 20     6.46       18       11      17 Presente       S            FI
## 21     4.35       16        9     234  Ausente       S            FI
## 22     3.49       17       19     286  Ausente       S            FO
## 23     5.74       17        9      32 Presente       S            FO
## 24     4.46       15        9      22 Presente       S            FO
## 25     5.00       13       15       2 Presente       S            FI
## 26     4.87       14       13     287 Presente       S            FI
## 27     4.22       17        8      72 Presente       S            FO
## 28     3.87       15       10      27 Presente       S            FI
## 29     4.65       14       11      42 Presente       S            FO
## 30     5.02       16       13      40 Presente       S            FI
## 31     5.59       18       11     244  Ausente       S            FI
## 32     4.47       14       10      35 Presente       S            FI
## 33     4.87       15        9     148  Ausente       S            FI
## 34     6.84       17        6     133 Presente       S            FO
## 35     5.43       18        5     186  Ausente       S            FO
## 36     5.02       17       16      56 Presente       S            FI
## 37     5.24       14       13     213 Presente       S            FO
## 38     6.74       16        8      40 Presente       S            FI
## 39     5.70       18       11     223 Presente       S            FO
## 40     5.78       16       13     218  Ausente       S            FI
## 41     5.20       19       13     233 Presente      PA            FO
## 42     3.98       14        8     164  Ausente      PA            FI
## 43     5.84       19       10     187 Presente      PA            FI
## 44     5.80       12       15     118 Presente      PA            FO
## 45     5.23       17        9     115 Presente      PA            FI
## 46     4.29       17        8     104 Presente      PA            FI
## 47     6.58       19       10     221  Ausente      PA            FI
## 48     4.03       18        4     110 Presente      PA            FI
## 49     5.48       16        9     262 Presente      PA            FI
## 50     3.58       14        9     297 Presente      PA            FI
## 51     5.15       17       10     275 Presente      PA            FO
## 52     5.57       15       11     101 Presente      PA            FO
## 53     5.92       15        7     300  Ausente      PA            FO
## 54     4.90       18       10      80 Presente      PA            FI
## 55     5.12       16        9     227 Presente      PA            FI
## 56     4.83       17       14     207 Presente      PA            FI
## 57     5.26       17       17     160  Ausente      PA            FI
## 58     5.63       15       13     290  Ausente      PA            FI
## 59     4.67       15       12     117 Presente      PA            FO
## 60     3.78       14       12     120 Presente      PA            FI
## 61     4.15       14       11     258 Presente      PA            FI
## 62     5.55       15       14     286  Ausente      PA            FI
## 63     5.52       18        5     169 Presente      PA            FI
## 64     4.70       18       14      66 Presente      PA            FI
## 65     4.36       16       14     159  Ausente      PA            FO
## 66     6.03       14       11     245 Presente      PA            FI
## 67     5.45       17       15     141 Presente      PA            FI
## 68     5.08       16        6     156 Presente      PA            FO
## 69     3.12       18       15      22 Presente      PA            FI
## 70     3.90       16        7     207 Presente      PA            FI
## 71     4.04       17        8      81 Presente      PA            FO
## 72     5.00       16       10      48  Ausente      PA            FI
## 73     6.41       18       18     167 Presente      PA            FI
## 74     3.99       16       10      40 Presente      PA            FI
## 75     5.90       16       13      80 Presente      PA            FI
## 76     5.74       16       11     159 Presente      PA            FO
## 77     4.80       15       13     232  Ausente      PA            FI
## 78     6.52       15       11     278 Presente      PA            FI
## 79     3.81       18        3      75 Presente      PA            FO
## 80     6.73       16       11      27 Presente      PA            FI
## 81     4.87       16       14     201 Presente      MA            FO
## 82     6.24       16        8      21 Presente      MA            FI
## 83     6.45       17       12     153  Ausente      MA            FI
## 84     5.01       16        9      77  Ausente      MA            FO
## 85     4.53       16       13     171  Ausente      MA            FO
## 86     5.36       16       12     233 Presente      MA            FI
## 87     4.84       15        7     176 Presente      MA            FI
## 88     5.63       14        9     255 Presente      MA            FO
## 89     4.76       15        9     201  Ausente      MA            FI
## 90     4.05       16        8     177 Presente      MA            FO
## 91     3.86       13        9     255 Presente      MA            FI
## 92     6.28       19        9     214 Presente      MA            FI
## 93     4.37       14       10     177 Presente      MA            FI
## 94     3.46       17        9     134  Ausente      MA            FO
## 95     5.62       18       14      67 Presente      MA            FO
## 96     3.62       14        8     114  Ausente      MA            FI
## 97     5.39       16        8      41 Presente      MA            FI
## 98     5.44       17       12      11 Presente      MA            FO
## 99     5.67       18       15     275 Presente      MA            FO
## 100    5.41       14       12     187 Presente      MA            FI
## 101    6.24       18        7      90 Presente      MA            FI
## 102    6.44       17       14     178  Ausente      MA            FI
## 103    5.37       16        4     246 Presente      MA            FI
## 104    5.16       16       12      80 Presente      MA            FO
## 105    5.23       16       11      32 Presente      MA            FO
## 106    3.90       14       13     179 Presente      MA            FI
## 107    5.36       19       15      22 Presente      MA            FO
## 108    4.50       18       15     188  Ausente      MA            FO
## 109    4.28       16        9     274  Ausente      MA            FO
## 110    6.22       14       10      99  Ausente      MA            FO
## 111    7.30       19        9       9 Presente      MA            FO
## 112    3.57       15        8     283 Presente      MA            FO
## 113    5.37       17       14      31 Presente      MA            FO
## 114    5.05       18        5      89 Presente      MA            FO
## 115    4.59       17       13      49 Presente      MA            FI
## 116    4.67       18       12     149 Presente      MA            FI
## 117    5.69       14        7      94 Presente      MA            FI
## 118    4.54       18        6     180  Ausente      MA            FO
## 119    5.69       16       13      72 Presente      MA            FI
## 120    5.18       16        9      96 Presente      MA            FO
##        biomasaz floresmm.r floresmm_d    hojasmm_d
## 1   -0.23192764 0.16666667 2.66666667 130.50000000
## 2   -1.14192764 0.26315789 0.15789474   0.60000000
## 3   -0.02192764 0.50000000 4.33333333 105.00000000
## 4   -0.64192764 0.31578947 0.52631579   0.39666667
## 5   -1.50192764 0.33333333 1.66666667  31.00000000
## 6   -0.47192764 0.31578947 0.52631579   0.69666667
## 7   -0.74192764 0.25000000 2.66666667  91.50000000
## 8    0.09807236 0.21052632 0.36842105   0.96666667
## 9   -1.91192764 0.16666667 2.66666667  48.50000000
## 10   1.25807236 0.21052632 0.26315789   0.81333333
## 11  -2.11192764 0.33333333 2.33333333  67.50000000
## 12   0.02807236 0.21052632 0.31578947   0.40333333
## 13  -0.76192764 0.33333333 2.33333333  91.00000000
## 14   0.12807236 0.21052632 0.21052632   0.60000000
## 15  -1.29192764 0.33333333 1.66666667  64.00000000
## 16  -0.77192764 0.21052632 0.42105263   0.04333333
## 17  -1.16192764 0.16666667 1.33333333 123.00000000
## 18  -0.78192764 0.31578947 0.31578947   0.51333333
## 19  -1.48192764 0.41666667 1.33333333   0.50000000
## 20   0.57807236 0.31578947 0.42105263   0.05000000
## 21  -1.53192764 0.33333333 2.00000000 116.00000000
## 22  -2.39192764 0.26315789 0.84210526   0.94666667
## 23  -0.14192764 0.41666667 2.00000000  15.00000000
## 24  -1.42192764 0.15789474 0.31578947   0.06666667
## 25  -0.88192764 0.08333333 4.00000000   0.00000000
## 26  -1.01192764 0.10526316 0.52631579   0.95000000
## 27  -1.66192764 0.41666667 1.66666667  35.00000000
## 28  -2.01192764 0.15789474 0.36842105   0.08333333
## 29  -1.23192764 0.16666667 2.66666667  20.00000000
## 30  -0.86192764 0.21052632 0.52631579   0.12666667
## 31  -0.29192764 0.50000000 2.66666667 121.00000000
## 32  -1.41192764 0.10526316 0.36842105   0.11000000
## 33  -1.01192764 0.25000000 2.00000000  73.00000000
## 34   0.95807236 0.26315789 0.15789474   0.43666667
## 35  -0.45192764 0.50000000 0.66666667  92.00000000
## 36  -0.86192764 0.26315789 0.68421053   0.18000000
## 37  -0.64192764 0.16666667 3.33333333 105.50000000
## 38   0.85807236 0.21052632 0.26315789   0.12666667
## 39  -0.18192764 0.50000000 2.66666667 110.50000000
## 40  -0.10192764 0.21052632 0.52631579   0.72000000
## 41  -0.68192764 0.58333333 3.33333333 115.50000000
## 42  -1.90192764 0.10526316 0.26315789   0.54000000
## 43  -0.04192764 0.58333333 2.33333333  92.50000000
## 44  -0.08192764 0.00000000 0.63157895   0.38666667
## 45  -0.65192764 0.41666667 2.00000000  56.50000000
## 46  -1.59192764 0.26315789 0.26315789   0.34000000
## 47   0.69807236 0.58333333 2.33333333 109.50000000
## 48  -1.85192764 0.31578947 0.05263158   0.36000000
## 49  -0.40192764 0.33333333 2.00000000 130.00000000
## 50  -2.30192764 0.10526316 0.31578947   0.98333333
## 51  -0.73192764 0.41666667 2.33333333 136.50000000
## 52  -0.31192764 0.15789474 0.42105263   0.33000000
## 53   0.03807236 0.25000000 1.33333333 149.00000000
## 54  -0.98192764 0.31578947 0.36842105   0.26000000
## 55  -0.76192764 0.33333333 2.00000000 112.50000000
## 56  -1.05192764 0.26315789 0.57894737   0.68333333
## 57  -0.62192764 0.41666667 4.66666667  79.00000000
## 58  -0.25192764 0.15789474 0.52631579   0.96000000
## 59  -1.21192764 0.25000000 3.00000000  57.50000000
## 60  -2.10192764 0.10526316 0.47368421   0.39333333
## 61  -1.73192764 0.16666667 2.66666667 128.00000000
## 62  -0.33192764 0.15789474 0.57894737   0.94666667
## 63  -0.36192764 0.50000000 0.66666667  83.50000000
## 64  -1.18192764 0.31578947 0.57894737   0.21333333
## 65  -1.52192764 0.33333333 3.66666667  78.50000000
## 66   0.14807236 0.10526316 0.42105263   0.81000000
## 67  -0.43192764 0.41666667 4.00000000  69.50000000
## 68  -0.80192764 0.21052632 0.15789474   0.51333333
## 69  -2.76192764 0.50000000 4.00000000  10.00000000
## 70  -1.98192764 0.21052632 0.21052632   0.68333333
## 71  -1.84192764 0.41666667 1.66666667  39.50000000
## 72  -0.88192764 0.21052632 0.36842105   0.15333333
## 73   0.52807236 0.50000000 5.00000000  82.50000000
## 74  -1.89192764 0.21052632 0.36842105   0.12666667
## 75   0.01807236 0.33333333 3.33333333  39.00000000
## 76  -0.14192764 0.21052632 0.42105263   0.52333333
## 77  -1.08192764 0.25000000 3.33333333 115.00000000
## 78   0.63807236 0.15789474 0.42105263   0.92000000
## 79  -2.07192764 0.50000000 0.00000000  36.50000000
## 80   0.84807236 0.21052632 0.42105263   0.08333333
## 81  -1.01192764 0.33333333 3.66666667  99.50000000
## 82   0.35807236 0.21052632 0.26315789   0.06333333
## 83   0.56807236 0.41666667 3.00000000  75.50000000
## 84  -0.87192764 0.21052632 0.31578947   0.25000000
## 85  -1.35192764 0.33333333 3.33333333  84.50000000
## 86  -0.52192764 0.21052632 0.47368421   0.77000000
## 87  -1.04192764 0.25000000 1.33333333  87.00000000
## 88  -0.25192764 0.10526316 0.31578947   0.84333333
## 89  -1.12192764 0.25000000 2.00000000  99.50000000
## 90  -1.83192764 0.21052632 0.26315789   0.58333333
## 91  -2.02192764 0.08333333 2.00000000 126.50000000
## 92   0.39807236 0.36842105 0.31578947   0.70666667
## 93  -1.51192764 0.16666667 2.33333333  87.50000000
## 94  -2.42192764 0.26315789 0.31578947   0.44000000
## 95  -0.26192764 0.50000000 3.66666667  32.50000000
## 96  -2.26192764 0.10526316 0.26315789   0.37333333
## 97  -0.49192764 0.33333333 1.66666667  19.50000000
## 98  -0.44192764 0.26315789 0.47368421   0.03000000
## 99  -0.21192764 0.50000000 4.00000000 136.50000000
## 100 -0.47192764 0.10526316 0.47368421   0.61666667
## 101  0.35807236 0.50000000 1.33333333  44.00000000
## 102  0.55807236 0.26315789 0.57894737   0.58666667
## 103 -0.51192764 0.33333333 0.33333333 122.00000000
## 104 -0.72192764 0.21052632 0.47368421   0.26000000
## 105 -0.65192764 0.33333333 2.66666667  15.00000000
## 106 -1.98192764 0.10526316 0.52631579   0.59000000
## 107 -0.52192764 0.58333333 4.00000000  10.00000000
## 108 -1.38192764 0.31578947 0.63157895   0.62000000
## 109 -1.60192764 0.33333333 2.00000000 136.00000000
## 110  0.33807236 0.10526316 0.36842105   0.32333333
## 111  1.41807236 0.58333333 2.00000000   3.50000000
## 112 -2.31192764 0.15789474 0.26315789   0.93666667
## 113 -0.51192764 0.41666667 3.66666667  14.50000000
## 114 -0.83192764 0.31578947 0.10526316   0.29000000
## 115 -1.29192764 0.41666667 3.33333333  23.50000000
## 116 -1.21192764 0.31578947 0.47368421   0.49000000
## 117 -0.19192764 0.16666667 1.33333333  46.00000000
## 118 -1.34192764 0.31578947 0.15789474   0.59333333
## 119 -0.19192764 0.33333333 3.33333333  35.00000000
## 120 -0.70192764 0.21052632 0.31578947   0.31333333

#Actividad 5

#5.1
tib.i %>%
  drop_na(Biomasa) %>% 
  summarise(MedBio = mean(Biomasa), count(tib.i, "Biomasa")) 
##     MedBio "Biomasa"  n
## 1 5.084494   Biomasa 90
#5.2  
tib.i %>% 
  drop_na(Biomasa) %>% 
  group_by(Fertilizacion) %>% 
  summarise(MedBio = mean(Biomasa), count(tib.i, "Biomasa"))
## # A tibble: 2 x 4
##   Fertilizacion MedBio `"Biomasa"`     n
##   <chr>          <dbl> <chr>       <int>
## 1 FI              5.19 Biomasa        90
## 2 FO              4.91 Biomasa        90
#5.3
tib.i %>% 
  group_by(Fertilizacion) %>% 
  summarise(Q1 = quantile(Biomasa, 0.10, na.rm = TRUE), 
            Q2 = quantile(Biomasa, 0.20, na.rm = TRUE),
            Q3 = quantile(Biomasa, 0.30, na.rm = TRUE), 
            Q4 = quantile(Biomasa, 0.40, na.rm = TRUE), 
            Q5 = quantile(Biomasa, 0.50, na.rm = TRUE))
## # A tibble: 2 x 6
##   Fertilizacion    Q1    Q2    Q3    Q4    Q5
##   <chr>         <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 FI             3.94  4.37  4.78  5.02  5.24
## 2 FO             3.84  4.14  4.44  4.54  4.87
#5.4
tib.i %>% 
  group_by(Fertilizacion, Plaga) %>% 
  summarise(MedBio = mean(Biomasa), 
            MednBio = median(Biomasa),
            MaxBio = max(Biomasa),
            MinBio = min(Biomasa),
            DesvTBio = sd(Biomasa),
            DesvMedBio = mean(abs(Biomasa - mean(Biomasa))),
            MedT = mean(Biomasa, trim = 0.1),
            VarBio = var(Biomasa))
## `summarise()` has grouped output by 'Fertilizacion'. You can override using the `.groups` argument.
## # A tibble: 4 x 10
## # Groups:   Fertilizacion [2]
##   Fertilizacion Plaga    MedBio MednBio MaxBio MinBio DesvTBio DesvMedBio  MedT
##   <chr>         <chr>     <dbl>   <dbl>  <dbl>  <dbl>    <dbl>      <dbl> <dbl>
## 1 FI            Ausente   NA      NA     NA     NA      NA         NA     NA   
## 2 FI            Presente   5.20    5.36   7.14   3.12    0.922      0.738  5.21
## 3 FO            Ausente    4.76    4.53   6.22   3.49    0.845      0.637  4.76
## 4 FO            Presente   4.96    5.12   7.3    3.57    0.912      0.693  4.88
## # ... with 1 more variable: VarBio <dbl>
#5.5  
tib.i %>% 
  filter(Estatus == "S" ) %>% 
  group_by(Fertilizacion, Plaga) %>% 
  summarise(MedBio = mean(Biomasa), 
            MednBio = median(Biomasa),
            MaxBio = max(Biomasa),
            MinBio = min(Biomasa),
            DesvTBio = sd(Biomasa),
            DesvMedBio = mean(abs(Biomasa - mean(Biomasa))),
            MedT = mean(Biomasa, trim = 0.1),
            VarBio = var(Biomasa))
## `summarise()` has grouped output by 'Fertilizacion'. You can override using the `.groups` argument.
## # A tibble: 4 x 10
## # Groups:   Fertilizacion [2]
##   Fertilizacion Plaga    MedBio MednBio MaxBio MinBio DesvTBio DesvMedBio  MedT
##   <chr>         <chr>     <dbl>   <dbl>  <dbl>  <dbl>    <dbl>      <dbl> <dbl>
## 1 FI            Ausente   NA      NA     NA     NA      NA         NA     NA   
## 2 FI            Presente   5.52    5.28   7.14   4.47    0.814      0.665  5.47
## 3 FO            Ausente    3.49    3.49   3.49   3.49   NA          0      3.49
## 4 FO            Presente   4.82    4.56   6.84   3.77    0.970      0.714  4.82
## # ... with 1 more variable: VarBio <dbl>
#5.6
tib.i %>% 
  drop_na(Biomasa) %>% 
  filter(Estatus == "S" ) %>% 
  group_by(Fertilizacion, Plaga) %>% 
  summarise(MedBio = mean(Biomasa), 
            MednBio = median(Biomasa),
            MaxBio = max(Biomasa),
            MinBio = min(Biomasa),
            DesvTBio = sd(Biomasa),
            DesvMedBio = mean(abs(Biomasa - mean(Biomasa))),
            MedT = mean(Biomasa, trim = 0.1),
            VarBio = var(Biomasa))
## `summarise()` has grouped output by 'Fertilizacion'. You can override using the `.groups` argument.
## # A tibble: 4 x 10
## # Groups:   Fertilizacion [2]
##   Fertilizacion Plaga    MedBio MednBio MaxBio MinBio DesvTBio DesvMedBio  MedT
##   <chr>         <chr>     <dbl>   <dbl>  <dbl>  <dbl>    <dbl>      <dbl> <dbl>
## 1 FI            Ausente    5.19    5.11   5.78   4.35    0.554      0.399  5.19
## 2 FI            Presente   5.52    5.28   7.14   4.47    0.814      0.665  5.47
## 3 FO            Ausente    3.49    3.49   3.49   3.49   NA          0      3.49
## 4 FO            Presente   4.82    4.56   6.84   3.77    0.970      0.714  4.82
## # ... with 1 more variable: VarBio <dbl>
#5.7 
tib.c %>% 
filter(Estatus %in% "MA" | Estatus %in% "PA" ) 
##    Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion     DivF
## 1     5.20       19       13     233 Presente      PA            FO 1.461538
## 2     3.98       14        8     164  Ausente      PA            FI 1.750000
## 3     5.84       19       10     187 Presente      PA            FI 1.900000
## 4     5.80       12       15     118 Presente      PA            FO 0.800000
## 5     5.23       17        9     115 Presente      PA            FI 1.888889
## 6     4.29       17        8     104 Presente      PA            FI 2.125000
## 7     6.58       19       10     221  Ausente      PA            FI 1.900000
## 8     4.03       18        4     110 Presente      PA            FI 4.500000
## 9     5.48       16        9     262 Presente      PA            FI 1.777778
## 10    3.58       14        9     297 Presente      PA            FI 1.555556
## 11    5.15       17       10     275 Presente      PA            FO 1.700000
## 12    5.57       15       11     101 Presente      PA            FO 1.363636
## 13    5.92       15        7     300  Ausente      PA            FO 2.142857
## 14    4.90       18       10      80 Presente      PA            FI 1.800000
## 15    5.12       16        9     227 Presente      PA            FI 1.777778
## 16    4.83       17       14     207 Presente      PA            FI 1.214286
## 17    5.26       17       17     160  Ausente      PA            FI 1.000000
## 18    5.63       15       13     290  Ausente      PA            FI 1.153846
## 19    4.67       15       12     117 Presente      PA            FO 1.250000
## 20    3.78       14       12     120 Presente      PA            FI 1.166667
## 21    4.15       14       11     258 Presente      PA            FI 1.272727
## 22    5.55       15       14     286  Ausente      PA            FI 1.071429
## 23    5.52       18        5     169 Presente      PA            FI 3.600000
## 24    4.70       18       14      66 Presente      PA            FI 1.285714
## 25    4.36       16       14     159  Ausente      PA            FO 1.142857
## 26    6.03       14       11     245 Presente      PA            FI 1.272727
## 27    5.45       17       15     141 Presente      PA            FI 1.133333
## 28    5.08       16        6     156 Presente      PA            FO 2.666667
## 29    3.12       18       15      22 Presente      PA            FI 1.200000
## 30    3.90       16        7     207 Presente      PA            FI 2.285714
## 31    4.04       17        8      81 Presente      PA            FO 2.125000
## 32    5.00       16       10      48  Ausente      PA            FI 1.600000
## 33    6.41       18       18     167 Presente      PA            FI 1.000000
## 34    3.99       16       10      40 Presente      PA            FI 1.600000
## 35    5.90       16       13      80 Presente      PA            FI 1.230769
## 36    5.74       16       11     159 Presente      PA            FO 1.454545
## 37    4.80       15       13     232  Ausente      PA            FI 1.153846
## 38    6.52       15       11     278 Presente      PA            FI 1.363636
## 39    3.81       18        3      75 Presente      PA            FO 6.000000
## 40    6.73       16       11      27 Presente      PA            FI 1.454545
## 41    4.87       16       14     201 Presente      MA            FO 1.142857
## 42    6.24       16        8      21 Presente      MA            FI 2.000000
## 43    6.45       17       12     153  Ausente      MA            FI 1.416667
## 44    5.01       16        9      77  Ausente      MA            FO 1.777778
## 45    4.53       16       13     171  Ausente      MA            FO 1.230769
## 46    5.36       16       12     233 Presente      MA            FI 1.333333
## 47    4.84       15        7     176 Presente      MA            FI 2.142857
## 48    5.63       14        9     255 Presente      MA            FO 1.555556
## 49    4.76       15        9     201  Ausente      MA            FI 1.666667
## 50    4.05       16        8     177 Presente      MA            FO 2.000000
## 51    3.86       13        9     255 Presente      MA            FI 1.444444
## 52    6.28       19        9     214 Presente      MA            FI 2.111111
## 53    4.37       14       10     177 Presente      MA            FI 1.400000
## 54    3.46       17        9     134  Ausente      MA            FO 1.888889
## 55    5.62       18       14      67 Presente      MA            FO 1.285714
## 56    3.62       14        8     114  Ausente      MA            FI 1.750000
## 57    5.39       16        8      41 Presente      MA            FI 2.000000
## 58    5.44       17       12      11 Presente      MA            FO 1.416667
## 59    5.67       18       15     275 Presente      MA            FO 1.200000
## 60    5.41       14       12     187 Presente      MA            FI 1.166667
## 61    6.24       18        7      90 Presente      MA            FI 2.571429
## 62    6.44       17       14     178  Ausente      MA            FI 1.214286
## 63    5.37       16        4     246 Presente      MA            FI 4.000000
## 64    5.16       16       12      80 Presente      MA            FO 1.333333
## 65    5.23       16       11      32 Presente      MA            FO 1.454545
## 66    3.90       14       13     179 Presente      MA            FI 1.076923
## 67    5.36       19       15      22 Presente      MA            FO 1.266667
## 68    4.50       18       15     188  Ausente      MA            FO 1.200000
## 69    4.28       16        9     274  Ausente      MA            FO 1.777778
## 70    6.22       14       10      99  Ausente      MA            FO 1.400000
## 71    7.30       19        9       9 Presente      MA            FO 2.111111
## 72    3.57       15        8     283 Presente      MA            FO 1.875000
## 73    5.37       17       14      31 Presente      MA            FO 1.214286
## 74    5.05       18        5      89 Presente      MA            FO 3.600000
## 75    4.59       17       13      49 Presente      MA            FI 1.307692
## 76    4.67       18       12     149 Presente      MA            FI 1.500000
## 77    5.69       14        7      94 Presente      MA            FI 2.000000
## 78    4.54       18        6     180  Ausente      MA            FO 3.000000
## 79    5.69       16       13      72 Presente      MA            FI 1.230769
## 80    5.18       16        9      96 Presente      MA            FO 1.777778
#5.8
tib.i <- tib.i[complete.cases(tib.i), ]
head(tib.i)
##   Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 2    5.92       15        7     300  Ausente      PA            FO
## 3    3.78       14       12     120 Presente      PA            FI
## 4    5.65       14       11     263 Presente       S            FI
## 5    6.24       18        7      90 Presente      MA            FI
## 6    5.41       18       13     211 Presente       S            FI
## 7    5.23       17        9     115 Presente      PA            FI
#5.9
tib.cc <- select(tib.c, -Flores.d, -Flores.r)
head(tib.cc)
##   Biomasa Hojas.d    Plaga Estatus Fertilizacion     DivF
## 1    5.65     263 Presente       S            FI 1.272727
## 2    4.74     182 Presente       S            FI 2.833333
## 3    5.86     212 Presente       S            FI 1.125000
## 4    5.24     121 Presente       S            FO 1.384615
## 5    4.38      64 Presente       S            FI 2.000000
## 6    5.41     211 Presente       S            FI 1.384615
#5.10
tib.c %>% 
select(contains(".d"))
##     Flores.d Hojas.d
## 1         11     263
## 2          6     182
## 3         16     212
## 4         13     121
## 5          8      64
## 6         13     211
## 7         11     185
## 8         10     292
## 9         11      99
## 10         8     246
## 11        10     137
## 12         9     123
## 13        10     184
## 14         7     182
## 15         8     130
## 16        11      15
## 17         7     248
## 18         9     156
## 19         7       3
## 20        11      17
## 21         9     234
## 22        19     286
## 23         9      32
## 24         9      22
## 25        15       2
## 26        13     287
## 27         8      72
## 28        10      27
## 29        11      42
## 30        13      40
## 31        11     244
## 32        10      35
## 33         9     148
## 34         6     133
## 35         5     186
## 36        16      56
## 37        13     213
## 38         8      40
## 39        11     223
## 40        13     218
## 41        13     233
## 42         8     164
## 43        10     187
## 44        15     118
## 45         9     115
## 46         8     104
## 47        10     221
## 48         4     110
## 49         9     262
## 50         9     297
## 51        10     275
## 52        11     101
## 53         7     300
## 54        10      80
## 55         9     227
## 56        14     207
## 57        17     160
## 58        13     290
## 59        12     117
## 60        12     120
## 61        11     258
## 62        14     286
## 63         5     169
## 64        14      66
## 65        14     159
## 66        11     245
## 67        15     141
## 68         6     156
## 69        15      22
## 70         7     207
## 71         8      81
## 72        10      48
## 73        18     167
## 74        10      40
## 75        13      80
## 76        11     159
## 77        13     232
## 78        11     278
## 79         3      75
## 80        11      27
## 81        14     201
## 82         8      21
## 83        12     153
## 84         9      77
## 85        13     171
## 86        12     233
## 87         7     176
## 88         9     255
## 89         9     201
## 90         8     177
## 91         9     255
## 92         9     214
## 93        10     177
## 94         9     134
## 95        14      67
## 96         8     114
## 97         8      41
## 98        12      11
## 99        15     275
## 100       12     187
## 101        7      90
## 102       14     178
## 103        4     246
## 104       12      80
## 105       11      32
## 106       13     179
## 107       15      22
## 108       15     188
## 109        9     274
## 110       10      99
## 111        9       9
## 112        8     283
## 113       14      31
## 114        5      89
## 115       13      49
## 116       12     149
## 117        7      94
## 118        6     180
## 119       13      72
## 120        9      96
#5.11
tib.c %>% 
select(Flores.r, Flores.d, everything())
##     Flores.r Flores.d Biomasa Hojas.d    Plaga Estatus Fertilizacion      DivF
## 1         14       11    5.65     263 Presente       S            FI 1.2727273
## 2         17        6    4.74     182 Presente       S            FI 2.8333333
## 3         18       16    5.86     212 Presente       S            FI 1.1250000
## 4         18       13    5.24     121 Presente       S            FO 1.3846154
## 5         16        8    4.38      64 Presente       S            FI 2.0000000
## 6         18       13    5.41     211 Presente       S            FI 1.3846154
## 7         15       11    5.14     185 Presente       S            FI 1.3636364
## 8         16       10    5.98     292 Presente       S            FI 1.6000000
## 9         14       11    3.97      99 Presente       S            FO 1.2727273
## 10        16        8    7.14     246 Presente       S            FI 2.0000000
## 11        16       10    3.77     137 Presente       S            FO 1.6000000
## 12        16        9    5.91     123 Presente       S            FI 1.7777778
## 13        16       10    5.12     184 Presente       S            FI 1.6000000
## 14        16        7    6.01     182 Presente       S            FO 2.2857143
## 15        16        8    4.59     130 Presente       S            FO 2.0000000
## 16        16       11    5.11      15  Ausente       S            FI 1.4545455
## 17        14        7    4.72     248 Presente       S            FI 2.0000000
## 18        18        9    5.10     156  Ausente       S            FI 2.0000000
## 19        17        7    4.40       3 Presente       S            FO 2.4285714
## 20        18       11    6.46      17 Presente       S            FI 1.6363636
## 21        16        9    4.35     234  Ausente       S            FI 1.7777778
## 22        17       19    3.49     286  Ausente       S            FO 0.8947368
## 23        17        9    5.74      32 Presente       S            FO 1.8888889
## 24        15        9    4.46      22 Presente       S            FO 1.6666667
## 25        13       15    5.00       2 Presente       S            FI 0.8666667
## 26        14       13    4.87     287 Presente       S            FI 1.0769231
## 27        17        8    4.22      72 Presente       S            FO 2.1250000
## 28        15       10    3.87      27 Presente       S            FI 1.5000000
## 29        14       11    4.65      42 Presente       S            FO 1.2727273
## 30        16       13    5.02      40 Presente       S            FI 1.2307692
## 31        18       11    5.59     244  Ausente       S            FI 1.6363636
## 32        14       10    4.47      35 Presente       S            FI 1.4000000
## 33        15        9    4.87     148  Ausente       S            FI 1.6666667
## 34        17        6    6.84     133 Presente       S            FO 2.8333333
## 35        18        5    5.43     186  Ausente       S            FO 3.6000000
## 36        17       16    5.02      56 Presente       S            FI 1.0625000
## 37        14       13    5.24     213 Presente       S            FO 1.0769231
## 38        16        8    6.74      40 Presente       S            FI 2.0000000
## 39        18       11    5.70     223 Presente       S            FO 1.6363636
## 40        16       13    5.78     218  Ausente       S            FI 1.2307692
## 41        19       13    5.20     233 Presente      PA            FO 1.4615385
## 42        14        8    3.98     164  Ausente      PA            FI 1.7500000
## 43        19       10    5.84     187 Presente      PA            FI 1.9000000
## 44        12       15    5.80     118 Presente      PA            FO 0.8000000
## 45        17        9    5.23     115 Presente      PA            FI 1.8888889
## 46        17        8    4.29     104 Presente      PA            FI 2.1250000
## 47        19       10    6.58     221  Ausente      PA            FI 1.9000000
## 48        18        4    4.03     110 Presente      PA            FI 4.5000000
## 49        16        9    5.48     262 Presente      PA            FI 1.7777778
## 50        14        9    3.58     297 Presente      PA            FI 1.5555556
## 51        17       10    5.15     275 Presente      PA            FO 1.7000000
## 52        15       11    5.57     101 Presente      PA            FO 1.3636364
## 53        15        7    5.92     300  Ausente      PA            FO 2.1428571
## 54        18       10    4.90      80 Presente      PA            FI 1.8000000
## 55        16        9    5.12     227 Presente      PA            FI 1.7777778
## 56        17       14    4.83     207 Presente      PA            FI 1.2142857
## 57        17       17    5.26     160  Ausente      PA            FI 1.0000000
## 58        15       13    5.63     290  Ausente      PA            FI 1.1538462
## 59        15       12    4.67     117 Presente      PA            FO 1.2500000
## 60        14       12    3.78     120 Presente      PA            FI 1.1666667
## 61        14       11    4.15     258 Presente      PA            FI 1.2727273
## 62        15       14    5.55     286  Ausente      PA            FI 1.0714286
## 63        18        5    5.52     169 Presente      PA            FI 3.6000000
## 64        18       14    4.70      66 Presente      PA            FI 1.2857143
## 65        16       14    4.36     159  Ausente      PA            FO 1.1428571
## 66        14       11    6.03     245 Presente      PA            FI 1.2727273
## 67        17       15    5.45     141 Presente      PA            FI 1.1333333
## 68        16        6    5.08     156 Presente      PA            FO 2.6666667
## 69        18       15    3.12      22 Presente      PA            FI 1.2000000
## 70        16        7    3.90     207 Presente      PA            FI 2.2857143
## 71        17        8    4.04      81 Presente      PA            FO 2.1250000
## 72        16       10    5.00      48  Ausente      PA            FI 1.6000000
## 73        18       18    6.41     167 Presente      PA            FI 1.0000000
## 74        16       10    3.99      40 Presente      PA            FI 1.6000000
## 75        16       13    5.90      80 Presente      PA            FI 1.2307692
## 76        16       11    5.74     159 Presente      PA            FO 1.4545455
## 77        15       13    4.80     232  Ausente      PA            FI 1.1538462
## 78        15       11    6.52     278 Presente      PA            FI 1.3636364
## 79        18        3    3.81      75 Presente      PA            FO 6.0000000
## 80        16       11    6.73      27 Presente      PA            FI 1.4545455
## 81        16       14    4.87     201 Presente      MA            FO 1.1428571
## 82        16        8    6.24      21 Presente      MA            FI 2.0000000
## 83        17       12    6.45     153  Ausente      MA            FI 1.4166667
## 84        16        9    5.01      77  Ausente      MA            FO 1.7777778
## 85        16       13    4.53     171  Ausente      MA            FO 1.2307692
## 86        16       12    5.36     233 Presente      MA            FI 1.3333333
## 87        15        7    4.84     176 Presente      MA            FI 2.1428571
## 88        14        9    5.63     255 Presente      MA            FO 1.5555556
## 89        15        9    4.76     201  Ausente      MA            FI 1.6666667
## 90        16        8    4.05     177 Presente      MA            FO 2.0000000
## 91        13        9    3.86     255 Presente      MA            FI 1.4444444
## 92        19        9    6.28     214 Presente      MA            FI 2.1111111
## 93        14       10    4.37     177 Presente      MA            FI 1.4000000
## 94        17        9    3.46     134  Ausente      MA            FO 1.8888889
## 95        18       14    5.62      67 Presente      MA            FO 1.2857143
## 96        14        8    3.62     114  Ausente      MA            FI 1.7500000
## 97        16        8    5.39      41 Presente      MA            FI 2.0000000
## 98        17       12    5.44      11 Presente      MA            FO 1.4166667
## 99        18       15    5.67     275 Presente      MA            FO 1.2000000
## 100       14       12    5.41     187 Presente      MA            FI 1.1666667
## 101       18        7    6.24      90 Presente      MA            FI 2.5714286
## 102       17       14    6.44     178  Ausente      MA            FI 1.2142857
## 103       16        4    5.37     246 Presente      MA            FI 4.0000000
## 104       16       12    5.16      80 Presente      MA            FO 1.3333333
## 105       16       11    5.23      32 Presente      MA            FO 1.4545455
## 106       14       13    3.90     179 Presente      MA            FI 1.0769231
## 107       19       15    5.36      22 Presente      MA            FO 1.2666667
## 108       18       15    4.50     188  Ausente      MA            FO 1.2000000
## 109       16        9    4.28     274  Ausente      MA            FO 1.7777778
## 110       14       10    6.22      99  Ausente      MA            FO 1.4000000
## 111       19        9    7.30       9 Presente      MA            FO 2.1111111
## 112       15        8    3.57     283 Presente      MA            FO 1.8750000
## 113       17       14    5.37      31 Presente      MA            FO 1.2142857
## 114       18        5    5.05      89 Presente      MA            FO 3.6000000
## 115       17       13    4.59      49 Presente      MA            FI 1.3076923
## 116       18       12    4.67     149 Presente      MA            FI 1.5000000
## 117       14        7    5.69      94 Presente      MA            FI 2.0000000
## 118       18        6    4.54     180  Ausente      MA            FO 3.0000000
## 119       16       13    5.69      72 Presente      MA            FI 1.2307692
## 120       16        9    5.18      96 Presente      MA            FO 1.7777778