library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
set.seed(2002)

RStudio 1.1

rnorm(n = 120, mean = 5, sd = 0.85)
##   [1] 4.909398 6.372278 6.180023 5.597361 6.918875 4.832975 6.442323 2.995781
##   [9] 4.930798 4.419750 4.052506 5.253902 4.439980 4.332207 4.535579 5.752409
##  [17] 6.989532 4.677384 5.210506 5.216152 5.880411 4.889257 5.429714 4.483143
##  [25] 4.349691 4.618528 5.464661 5.170106 4.203611 4.907615 4.209083 2.888746
##  [33] 5.582622 5.512323 5.298449 4.264810 5.098686 3.871123 4.451304 4.634654
##  [41] 4.953839 5.504743 4.555465 4.541647 3.989604 3.637920 5.562881 6.738027
##  [49] 5.865057 4.093780 5.036899 6.035230 5.242667 4.494623 5.303897 5.500239
##  [57] 4.619097 5.007615 4.545968 4.870583 6.242588 5.407035 4.415973 6.084476
##  [65] 5.537183 4.885858 5.990833 4.037062 5.210883 2.806557 5.169706 3.938664
##  [73] 4.609539 4.511423 4.059877 4.767323 6.703784 4.698898 4.907335 2.896542
##  [81] 5.308360 5.457121 5.408526 3.707589 5.617609 5.470932 5.940244 4.768528
##  [89] 5.467348 4.562944 5.955865 4.506312 4.927597 4.832009 4.222238 5.430643
##  [97] 4.545065 4.576802 4.712857 7.132155 4.352934 6.384660 4.744229 3.315871
## [105] 5.437711 5.485564 5.461241 4.658115 6.548850 5.432135 5.324088 6.019763
## [113] 6.407362 4.698445 4.481951 4.593927 4.418094 3.742684 3.990734 5.055787
Biomasa = rnorm(n = 120, mean = 5, sd = 0.85)

RStudio 1.2

Flores.r = rbinom(n = 120, size = 20, prob = 0.8)
hist(Flores.r)

Flores.r
##   [1] 15 18 13 16 17 18 18 15 17 19 16 15 16 15 14 16 13 16 16 13 17 16 17 16 15
##  [26] 14 16 16 18 12 15 18 18 18 15 17 17 15 14 16 15 15 17 17 14 18 17 17 18 17
##  [51] 17 17 14 16 18 19 15 16 16 17 17 15 15 14 16 17 16 16 18 17 20 16 15 13 13
##  [76] 17 16 15 14 14 15 16 16 17 13 16 17 15 17 18 18 17 16 15 19 17 15 16 19 14
## [101] 18 15 18 16 15 16 16 18 16 17 17 17 18 15 15 19 14 17 13 13

RStudio 1.3

rpois(n = 120, lambda = 10.5)
##   [1] 13  8 12 10  9 10 12  9  7 13 14 18 12  9 10 12  9 10 12 11 16  4  9 13  8
##  [26] 12 16  8 11 10  9  9 12  6 12  7  7 11  8 15  7 11 11 12  8  9 12  9  5 11
##  [51] 10 14  6  7  7 15 12 10  9  9  9  8  7 10  3  7  9 12 14  5 12  7 13 12  5
##  [76] 10 12  9 14  6  9  9 10  9  7  5 16  8 12  8  4 13  9 10  9 10  9 15 16 13
## [101] 15  9 16 10  9  8  8  8 18 10  8  8  4 11  9 15 14  5 10  8
Flores.d = rpois(n = 120, lambda = 10.5)
Flores.d
##   [1]  8 11 12 13 14 11 11 14 12 13 10 11 11 12 12 15  8 16  9 11  7  7 10 14  8
##  [26]  9  7 11 10  9  9 14 10  9  9 10  8 10 12 10 10 11 14 10  8 13 13  9 11  9
##  [51]  8  9 10 12 11 13 11 13 16 15 10  9  9  6 12 12 14 11 11 12 14 11  8  9  8
##  [76] 12  9  9 14 10 10 10 13  8  9  7  8  9  8  8  8  7  7 11 10  9  9 10  9  9
## [101]  8  8  5 13 13 15  9  8 11  6 10  9 14 17 11 13 11  4 13 10

RStudio 1.4

sample.int(n = 300, size = 120, replace = TRUE)
##   [1] 208 148  91 238  31 208   8 279  16   4 215 164   9 220 208 209 284 126
##  [19] 198 132  58  31 291 260 164 224  90 195 209  14  71  44 253  84  86 101
##  [37] 227 294 217 178 171 164  94 295 139 230 228 171 163  45 190 272  45  78
##  [55]   2 168  42  84 101 142 170 216 122   9 102 268 293 285 242 207  47 208
##  [73] 250 215 123 102  97 265 241 150 148 229 271 196  15  65  41  31 236 231
##  [91] 242 198 267 170 244 114 241 261  20   4  15  75 271  95 198 195 212 241
## [109]  94 269  85 251  74 292 224 142 191  77 282 230
Hojas.d = sample.int(n = 300, size = 120, replace = TRUE)
Hojas.d
##   [1] 256  36 296 106 161 213 293  16 173 140  24 238 285 291 258 105 152  69
##  [19] 141  64  41 144 143  90  38 108 230 126  22 174 149 140 162  62  90  49
##  [37] 294   2 292 166 299 181  12 138  14   3 125  65 261 252  63 131 297 258
##  [55] 257 175 284 272  57  99  34 222  99 253  91 268 175 182 146 157 218 129
##  [73] 114  63 196  56 108 251 224  28 192 172  35 165 227 126 163  39  46  60
##  [91]  63  19  26 230 171  20 163  69 191  76  43  35 260 266  14  10  17 231
## [109] 259 225  36 183 221  51 150 219 272 167  98 247

RStudio 1.5

library(purrr)
dist_bern = rbernoulli(n = 120, p = 0.75)
dist_bern
##   [1] FALSE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE  TRUE FALSE  TRUE
##  [13]  TRUE  TRUE FALSE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE
##  [25]  TRUE  TRUE  TRUE  TRUE  TRUE FALSE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE
##  [37]  TRUE  TRUE FALSE FALSE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE
##  [49]  TRUE FALSE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE
##  [61]  TRUE FALSE  TRUE  TRUE  TRUE FALSE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE
##  [73]  TRUE  TRUE FALSE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE  TRUE
##  [85]  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE  TRUE FALSE FALSE  TRUE
##  [97] FALSE  TRUE FALSE FALSE  TRUE  TRUE  TRUE FALSE  TRUE FALSE FALSE  TRUE
## [109]  TRUE  TRUE  TRUE FALSE  TRUE  TRUE  TRUE  TRUE FALSE FALSE  TRUE FALSE
Plaga =ifelse(dist_bern == TRUE, "presente", "ausente")
Plaga
##   [1] "ausente"  "presente" "presente" "presente" "presente" "presente"
##   [7] "presente" "ausente"  "presente" "presente" "ausente"  "presente"
##  [13] "presente" "presente" "ausente"  "presente" "presente" "ausente" 
##  [19] "presente" "presente" "presente" "presente" "presente" "ausente" 
##  [25] "presente" "presente" "presente" "presente" "presente" "ausente" 
##  [31] "ausente"  "presente" "presente" "presente" "presente" "presente"
##  [37] "presente" "presente" "ausente"  "ausente"  "presente" "presente"
##  [43] "presente" "presente" "ausente"  "presente" "presente" "presente"
##  [49] "presente" "ausente"  "ausente"  "presente" "presente" "presente"
##  [55] "presente" "presente" "presente" "presente" "presente" "presente"
##  [61] "presente" "ausente"  "presente" "presente" "presente" "ausente" 
##  [67] "presente" "presente" "ausente"  "presente" "presente" "presente"
##  [73] "presente" "presente" "ausente"  "presente" "presente" "presente"
##  [79] "presente" "presente" "presente" "ausente"  "presente" "presente"
##  [85] "presente" "presente" "presente" "presente" "presente" "presente"
##  [91] "presente" "presente" "presente" "ausente"  "ausente"  "presente"
##  [97] "ausente"  "presente" "ausente"  "ausente"  "presente" "presente"
## [103] "presente" "ausente"  "presente" "ausente"  "ausente"  "presente"
## [109] "presente" "presente" "presente" "ausente"  "presente" "presente"
## [115] "presente" "presente" "ausente"  "ausente"  "presente" "ausente"

RStudio 1.6

gl(n = 3, k = 40, labels = c('S', 'PA', 'MA'))
##   [1] S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S 
##  [26] S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  PA PA PA PA PA PA PA PA PA PA
##  [51] PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA
##  [76] PA PA PA PA PA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA
## [101] MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA
## Levels: S PA MA
Estatus = gl(n = 3, k = 40, labels = c('S', 'PA', 'MA'))
Estatus
##   [1] S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  S 
##  [26] S  S  S  S  S  S  S  S  S  S  S  S  S  S  S  PA PA PA PA PA PA PA PA PA PA
##  [51] PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA PA
##  [76] PA PA PA PA PA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA
## [101] MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA MA
## Levels: S PA MA

##RStudio 1.7

distribución_uniforme = runif(n = 120, min = 0, max =1.2)
distribución_uniforme
##   [1] 1.02521897 0.91041754 0.94226470 0.19456960 0.54095820 1.10979860
##   [7] 1.02685850 0.18393989 1.02340732 0.67515943 0.68025424 0.61800707
##  [13] 0.51492360 0.76983731 0.38480788 0.37131534 0.72439872 0.96956579
##  [19] 0.22712931 0.15297675 0.30610188 0.27934279 0.07990936 0.97602447
##  [25] 0.97734394 0.98547537 0.62015669 0.33166199 0.62490140 0.11636496
##  [31] 0.19664197 0.05155030 0.00191072 0.52171890 1.19875111 0.47686323
##  [37] 0.92699158 1.03202706 0.19177673 0.76990939 0.39838037 0.25406752
##  [43] 1.13640459 0.09555733 0.09978290 0.74665063 1.19264613 0.34190892
##  [49] 1.11072605 0.28221149 0.62540616 0.58741235 0.78163718 0.46134015
##  [55] 0.52095408 0.71140585 0.27951383 0.86356502 0.28619549 0.89844568
##  [61] 0.92917316 1.16328389 0.91774358 0.69762199 0.32231113 0.89477031
##  [67] 1.16359407 1.14890034 0.33257194 0.50658331 0.38065701 0.87656090
##  [73] 1.12876460 0.17898538 0.57288561 0.61120023 0.73360518 1.08305348
##  [79] 0.84330813 1.10532707 1.17822139 1.02624103 0.92561113 0.67941740
##  [85] 1.01420372 0.68282149 1.10671472 1.05710160 0.83898129 0.38019425
##  [91] 0.75352750 0.34008122 0.20681952 0.14302895 1.02211965 0.22899953
##  [97] 1.17691836 0.51807472 0.63247305 0.97269853 0.79742440 0.30072899
## [103] 1.11475400 0.59468452 0.30301492 0.08031818 0.76108605 0.20368037
## [109] 1.19634080 0.94103366 0.98085763 0.90273527 0.43122598 1.12718661
## [115] 0.33321162 1.04985546 0.17848659 0.91460984 1.08930823 0.65544817
ifelse(distribución_uniforme< 0.5, 'FO', 'FI')
##   [1] "FI" "FI" "FI" "FO" "FI" "FI" "FI" "FO" "FI" "FI" "FI" "FI" "FI" "FI" "FO"
##  [16] "FO" "FI" "FI" "FO" "FO" "FO" "FO" "FO" "FI" "FI" "FI" "FI" "FO" "FI" "FO"
##  [31] "FO" "FO" "FO" "FI" "FI" "FO" "FI" "FI" "FO" "FI" "FO" "FO" "FI" "FO" "FO"
##  [46] "FI" "FI" "FO" "FI" "FO" "FI" "FI" "FI" "FO" "FI" "FI" "FO" "FI" "FO" "FI"
##  [61] "FI" "FI" "FI" "FI" "FO" "FI" "FI" "FI" "FO" "FI" "FO" "FI" "FI" "FO" "FI"
##  [76] "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FO"
##  [91] "FI" "FO" "FO" "FO" "FI" "FO" "FI" "FI" "FI" "FI" "FI" "FO" "FI" "FI" "FO"
## [106] "FO" "FI" "FO" "FI" "FI" "FI" "FI" "FO" "FI" "FO" "FI" "FO" "FI" "FI" "FI"
Fertilizacion = ifelse(distribución_uniforme< 0.5, 'FO', 'FI')
Fertilizacion
##   [1] "FI" "FI" "FI" "FO" "FI" "FI" "FI" "FO" "FI" "FI" "FI" "FI" "FI" "FI" "FO"
##  [16] "FO" "FI" "FI" "FO" "FO" "FO" "FO" "FO" "FI" "FI" "FI" "FI" "FO" "FI" "FO"
##  [31] "FO" "FO" "FO" "FI" "FI" "FO" "FI" "FI" "FO" "FI" "FO" "FO" "FI" "FO" "FO"
##  [46] "FI" "FI" "FO" "FI" "FO" "FI" "FI" "FI" "FO" "FI" "FI" "FO" "FI" "FO" "FI"
##  [61] "FI" "FI" "FI" "FI" "FO" "FI" "FI" "FI" "FO" "FI" "FO" "FI" "FI" "FO" "FI"
##  [76] "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FI" "FO"
##  [91] "FI" "FO" "FO" "FO" "FI" "FO" "FI" "FI" "FI" "FI" "FI" "FO" "FI" "FI" "FO"
## [106] "FO" "FI" "FO" "FI" "FI" "FI" "FI" "FO" "FI" "FO" "FI" "FO" "FI" "FI" "FI"

##RStudio 1.8

df1 = data.frame(Biomasa, Flores.r, Flores.d, Hojas.d, Plaga, Estatus, Fertilizacion)
dim(df1)
## [1] 120   7
str(df1)
## 'data.frame':    120 obs. of  7 variables:
##  $ Biomasa      : num  5.28 3.68 5.5 7.48 5.31 ...
##  $ Flores.r     : int  15 18 13 16 17 18 18 15 17 19 ...
##  $ Flores.d     : int  8 11 12 13 14 11 11 14 12 13 ...
##  $ Hojas.d      : int  256 36 296 106 161 213 293 16 173 140 ...
##  $ Plaga        : chr  "ausente" "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(df1)
## [1] "data.frame"
names(df1)
## [1] "Biomasa"       "Flores.r"      "Flores.d"      "Hojas.d"      
## [5] "Plaga"         "Estatus"       "Fertilizacion"
is.na(df1)
##        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

##RStudio 1.9

library(dplyr)
sample_n(df1, 120*0.75)
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  4.631105       18       11     257 presente      PA            FI
## 2  4.427496       16        9     108 presente      PA            FI
## 3  4.614101       16       11     129 presente      PA            FI
## 4  4.844048       16        7      26 presente      MA            FO
## 5  4.278127       15       14      16  ausente       S            FO
## 6  5.057106       15       10       2 presente       S            FI
## 7  4.985391       16        7     126 presente      MA            FI
## 8  6.108589       18       10     162 presente       S            FO
## 9  3.959340       17       12     268  ausente      PA            FI
## 10 5.811167       17       14      12 presente      PA            FI
## 11 4.609088       17       10      49 presente       S            FO
## 12 5.389719       15       12     291 presente       S            FI
## 13 6.921230       16       16      57 presente      PA            FO
## 14 5.827465       18       11     146  ausente      PA            FO
## 15 3.681318       18       11      36 presente       S            FI
## 16 3.614348       17        6     225 presente      MA            FI
## 17 4.703498       18        5     260 presente      MA            FI
## 18 5.147939       14       11     272  ausente      MA            FO
## 19 5.086390       17       12     157 presente      PA            FI
## 20 4.850791       17        7      19 presente      MA            FO
## 21 4.121795       15        9     251 presente      PA            FI
## 22 5.986789       13       10     247  ausente      MA            FI
## 23 4.150279       15       11     181 presente      PA            FO
## 24 4.596181       18       13       3 presente      PA            FI
## 25 5.977290       15       17      51 presente      MA            FI
## 26 7.482596       16       13     106 presente       S            FO
## 27 5.642353       17        8     165 presente      MA            FI
## 28 6.280048       16        7     230 presente       S            FI
## 29 4.360196       15        9     222  ausente      PA            FI
## 30 5.498807       13       12     296 presente       S            FI
## 31 4.604764       16       15     105 presente       S            FO
## 32 4.918891       15        8      38 presente       S            FI
## 33 5.156747       13        9     227 presente      MA            FI
## 34 4.727631       17        9     131 presente      PA            FI
## 35 5.357669       19       13     140 presente       S            FI
## 36 5.246465       16       10      69 presente      MA            FI
## 37 5.282284       15        8     256  ausente       S            FI
## 38 6.112725       16       16      69  ausente       S            FI
## 39 5.341051       17        8      46 presente      MA            FI
## 40 4.865976       19       13     219 presente      MA            FI
## 41 4.988360       16       10      24  ausente       S            FI
## 42 5.025019       17        9     252  ausente      PA            FO
## 43 3.658050       15        9     149  ausente       S            FO
## 44 3.457137       15        8     114 presente      PA            FI
## 45 5.368891       16        9     141 presente       S            FO
## 46 3.008715       17       10      34 presente      PA            FI
## 47 4.576332       17        8      63  ausente      PA            FI
## 48 4.858429       16       14      90  ausente       S            FI
## 49 5.211317       14       10      28 presente      PA            FI
## 50 5.992324       16       12     258 presente      PA            FO
## 51 4.010872       19       10     171  ausente      MA            FI
## 52 4.937786       17       13     125 presente      PA            FI
## 53 4.455432       14        9      76  ausente      MA            FI
## 54 4.735235       16        9      17  ausente      MA            FI
## 55 6.307095       17       10      36 presente      MA            FI
## 56 5.945031       16       13     272 presente      PA            FI
## 57 6.385937       17       10     143 presente       S            FO
## 58 6.291197       15        8      35 presente      MA            FO
## 59 5.828094       15        9      90 presente       S            FI
## 60 5.845275       13        9      63 presente      PA            FO
## 61 5.306467       17       14     161 presente       S            FI
## 62 5.151994       18        8      60 presente      MA            FO
## 63 4.983138       16       11     285 presente       S            FI
## 64 5.891949       16       15      10  ausente      MA            FO
## 65 4.026518       15       10     299 presente      PA            FO
## 66 5.196912       17        9     183  ausente      MA            FI
## 67 5.418730       14        9     108 presente       S            FI
## 68 5.872778       15        9      99 presente      PA            FI
## 69 6.762958       20       14     218 presente      PA            FO
## 70 3.512971       18       14     221 presente      MA            FO
## 71 3.882138       16        7     144 presente       S            FO
## 72 5.741851       18        8      63 presente      MA            FI
## 73 5.551141       16       13     266  ausente      MA            FI
## 74 4.363459       16       14     175 presente      PA            FI
## 75 4.531162       13        8     152 presente       S            FI
## 76 4.949278       18       10      22 presente       S            FI
## 77 4.976547       15       11     238 presente       S            FI
## 78 5.810975       16       11     182 presente      PA            FI
## 79 3.989777       17        9      20 presente      MA            FO
## 80 5.756612       16       10     166  ausente       S            FI
## 81 5.570823       17       15      99 presente      PA            FI
## 82 5.463678       18       11     261 presente      PA            FI
## 83 5.005355       18       14     140 presente       S            FO
## 84 4.688809       17       10     138 presente      PA            FO
## 85 4.967470       16       11     259 presente      MA            FI
## 86 5.244096       15        9     163  ausente      MA            FI
## 87 4.381293       13       11      64 presente       S            FO
## 88 5.370697       17        9      65 presente      PA            FO
## 89 4.979726       17       12     173 presente       S            FI
## 90 4.579518       17        8     163 presente      MA            FI
tic.i = sample_n(df1, 120*0.75)
tic.i
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  4.983138       16       11     285 presente       S            FI
## 2  3.681318       18       11      36 presente       S            FI
## 3  5.025019       17        9     252  ausente      PA            FO
## 4  6.280048       16        7     230 presente       S            FI
## 5  6.112725       16       16      69  ausente       S            FI
## 6  6.921230       16       16      57 presente      PA            FO
## 7  5.357669       19       13     140 presente       S            FI
## 8  4.121795       15        9     251 presente      PA            FI
## 9  6.230549       18       11     213 presente       S            FI
## 10 4.026518       15       10     299 presente      PA            FO
## 11 5.437274       19        9     191  ausente      MA            FI
## 12 4.735235       16        9      17  ausente      MA            FI
## 13 5.810975       16       11     182 presente      PA            FI
## 14 4.381293       13       11      64 presente       S            FO
## 15 5.945031       16       13     272 presente      PA            FI
## 16 5.293377       14       12     258  ausente       S            FO
## 17 5.123132       19       13     175 presente      PA            FI
## 18 4.976547       15       11     238 presente       S            FI
## 19 5.246465       16       10      69 presente      MA            FI
## 20 3.008715       17       10      34 presente      PA            FI
## 21 3.819193       14        6     253 presente      PA            FI
## 22 4.688809       17       10     138 presente      PA            FO
## 23 4.979726       17       12     173 presente       S            FI
## 24 4.034066       15        9      39 presente      MA            FI
## 25 4.455432       14        9      76  ausente      MA            FI
## 26 5.086390       17       12     157 presente      PA            FI
## 27 5.211317       14       10      28 presente      PA            FI
## 28 5.156747       13        9     227 presente      MA            FI
## 29 5.986789       13       10     247  ausente      MA            FI
## 30 4.967470       16       11     259 presente      MA            FI
## 31 5.844751       17       12      56 presente      PA            FI
## 32 5.057106       15       10       2 presente       S            FI
## 33 5.294819       18       11     293 presente       S            FI
## 34 4.988360       16       10      24  ausente       S            FI
## 35 5.278693       12        9     174  ausente       S            FO
## 36 4.407045       15       13      14 presente      MA            FO
## 37 6.385937       17       10     143 presente       S            FO
## 38 4.733328       13        8     196  ausente      PA            FI
## 39 4.727631       17        9     131 presente      PA            FI
## 40 3.658050       15        9     149  ausente       S            FO
## 41 5.741851       18        8      63 presente      MA            FI
## 42 5.570823       17       15      99 presente      PA            FI
## 43 5.306467       17       14     161 presente       S            FI
## 44 4.609088       17       10      49 presente       S            FO
## 45 5.992324       16       12     258 presente      PA            FO
## 46 5.845275       13        9      63 presente      PA            FO
## 47 4.844048       16        7      26 presente      MA            FO
## 48 6.441178       17        7      41 presente       S            FO
## 49 3.882138       16        7     144 presente       S            FO
## 50 5.282284       15        8     256  ausente       S            FI
## 51 6.307095       17       10      36 presente      MA            FI
## 52 4.937786       17       13     125 presente      PA            FI
## 53 4.359705       14       14     224 presente      PA            FI
## 54 5.498807       13       12     296 presente       S            FI
## 55 5.891949       16       15      10  ausente      MA            FO
## 56 4.531162       13        8     152 presente       S            FI
## 57 3.989777       17        9      20 presente      MA            FO
## 58 5.005355       18       14     140 presente       S            FO
## 59 5.811167       17       14      12 presente      PA            FI
## 60 6.124436       16       10     172  ausente      MA            FI
## 61 4.576332       17        8      63  ausente      PA            FI
## 62 4.048492       16       12      91 presente      PA            FO
## 63 6.108589       18       10     162 presente       S            FO
## 64 5.827465       18       11     146  ausente      PA            FO
## 65 5.749866       15       10     192 presente      MA            FI
## 66 4.865976       19       13     219 presente      MA            FI
## 67 5.389719       15       12     291 presente       S            FI
## 68 5.328616       15       11     230  ausente      MA            FO
## 69 5.872778       15        9      99 presente      PA            FI
## 70 4.360196       15        9     222  ausente      PA            FI
## 71 3.959340       17       12     268  ausente      PA            FI
## 72 5.777783       16       11     126 presente       S            FO
## 73 3.512971       18       14     221 presente      MA            FO
## 74 4.614101       16       11     129 presente      PA            FI
## 75 5.828094       15        9      90 presente       S            FI
## 76 4.850791       17        7      19 presente      MA            FO
## 77 5.196912       17        9     183  ausente      MA            FI
## 78 5.770627       14       10     297 presente      PA            FI
## 79 3.457137       15        8     114 presente      PA            FI
## 80 5.347643       18        9      62 presente       S            FI
## 81 5.370697       17        9      65 presente      PA            FO
## 82 6.058621       14       12     292  ausente       S            FO
## 83 5.368891       16        9     141 presente       S            FO
## 84 4.278127       15       14      16  ausente       S            FO
## 85 5.551141       16       13     266  ausente      MA            FI
## 86 4.427496       16        9     108 presente      PA            FI
## 87 5.745108       18        8      43 presente      MA            FI
## 88 4.462622       17        4     167  ausente      MA            FI
## 89 4.918891       15        8      38 presente       S            FI
## 90 7.482596       16       13     106 presente       S            FO
sample_n(df1, 120*1)
##      Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1   4.967470       16       11     259 presente      MA            FI
## 2   4.614101       16       11     129 presente      PA            FI
## 3   3.989777       17        9      20 presente      MA            FO
## 4   4.034066       15        9      39 presente      MA            FI
## 5   5.986789       13       10     247  ausente      MA            FI
## 6   4.609088       17       10      49 presente       S            FO
## 7   4.121795       15        9     251 presente      PA            FI
## 8   5.057106       15       10       2 presente       S            FI
## 9   4.688809       17       10     138 presente      PA            FO
## 10  4.010872       19       10     171  ausente      MA            FI
## 11  5.168350       17        8     294 presente       S            FI
## 12  3.681318       18       11      36 presente       S            FI
## 13  6.108589       18       10     162 presente       S            FO
## 14  4.703498       18        5     260 presente      MA            FI
## 15  6.230549       18       11     213 presente       S            FI
## 16  6.762958       20       14     218 presente      PA            FO
## 17  5.211317       14       10      28 presente      PA            FI
## 18  3.756151       14        8      14  ausente      PA            FO
## 19  4.631105       18       11     257 presente      PA            FI
## 20  5.872778       15        9      99 presente      PA            FI
## 21  6.202656       15       11     150 presente      MA            FO
## 22  4.983138       16       11     285 presente       S            FI
## 23  5.741851       18        8      63 presente      MA            FI
## 24  3.512971       18       14     221 presente      MA            FO
## 25  5.282284       15        8     256  ausente       S            FI
## 26  3.614348       17        6     225 presente      MA            FI
## 27  4.363459       16       14     175 presente      PA            FI
## 28  5.246465       16       10      69 presente      MA            FI
## 29  5.278693       12        9     174  ausente       S            FO
## 30  5.437274       19        9     191  ausente      MA            FI
## 31  4.576332       17        8      63  ausente      PA            FI
## 32  5.328616       15       11     230  ausente      MA            FO
## 33  5.498807       13       12     296 presente       S            FI
## 34  5.891949       16       15      10  ausente      MA            FO
## 35  6.441178       17        7      41 presente       S            FO
## 36  4.026518       15       10     299 presente      PA            FO
## 37  6.385937       17       10     143 presente       S            FO
## 38  5.570823       17       15      99 presente      PA            FI
## 39  5.151994       18        8      60 presente      MA            FO
## 40  5.811167       17       14      12 presente      PA            FI
## 41  4.988360       16       10      24  ausente       S            FI
## 42  4.844048       16        7      26 presente      MA            FO
## 43  5.156747       13        9     227 presente      MA            FI
## 44  4.604764       16       15     105 presente       S            FO
## 45  4.850791       17        7      19 presente      MA            FO
## 46  6.058621       14       12     292  ausente       S            FO
## 47  5.845275       13        9      63 presente      PA            FO
## 48  5.642353       17        8     165 presente      MA            FI
## 49  5.123132       19       13     175 presente      PA            FI
## 50  5.341051       17        8      46 presente      MA            FI
## 51  4.531162       13        8     152 presente       S            FI
## 52  4.455432       14        9      76  ausente      MA            FI
## 53  4.462622       17        4     167  ausente      MA            FI
## 54  5.756612       16       10     166  ausente       S            FI
## 55  5.418730       14        9     108 presente       S            FI
## 56  5.306467       17       14     161 presente       S            FI
## 57  4.865976       19       13     219 presente      MA            FI
## 58  5.086390       17       12     157 presente      PA            FI
## 59  5.368891       16        9     141 presente       S            FO
## 60  4.979726       17       12     173 presente       S            FI
## 61  6.112725       16       16      69  ausente       S            FI
## 62  5.244096       15        9     163  ausente      MA            FI
## 63  4.407045       15       13      14 presente      MA            FO
## 64  4.359705       14       14     224 presente      PA            FI
## 65  5.810975       16       11     182 presente      PA            FI
## 66  5.025019       17        9     252  ausente      PA            FO
## 67  4.978747       16       13      35 presente      MA            FI
## 68  5.977290       15       17      51 presente      MA            FI
## 69  5.992324       16       12     258 presente      PA            FO
## 70  7.482596       16       13     106 presente       S            FO
## 71  6.291197       15        8      35 presente      MA            FO
## 72  4.727631       17        9     131 presente      PA            FI
## 73  5.370697       17        9      65 presente      PA            FO
## 74  4.985391       16        7     126 presente      MA            FI
## 75  6.921230       16       16      57 presente      PA            FO
## 76  4.858429       16       14      90  ausente       S            FI
## 77  3.658050       15        9     149  ausente       S            FO
## 78  3.470145       13       13      98 presente      MA            FI
## 79  4.048492       16       12      91 presente      PA            FO
## 80  3.008715       17       10      34 presente      PA            FI
## 81  5.827465       18       11     146  ausente      PA            FO
## 82  4.976547       15       11     238 presente       S            FI
## 83  5.844751       17       12      56 presente      PA            FI
## 84  3.819193       14        6     253 presente      PA            FI
## 85  4.937786       17       13     125 presente      PA            FI
## 86  6.307095       17       10      36 presente      MA            FI
## 87  5.702020       15       11     284 presente      PA            FO
## 88  5.293377       14       12     258  ausente       S            FO
## 89  6.124436       16       10     172  ausente      MA            FI
## 90  6.280048       16        7     230 presente       S            FI
## 91  4.735235       16        9      17  ausente      MA            FI
## 92  5.147939       14       11     272  ausente      MA            FO
## 93  4.381293       13       11      64 presente       S            FO
## 94  4.427496       16        9     108 presente      PA            FI
## 95  5.196912       17        9     183  ausente      MA            FI
## 96  5.945031       16       13     272 presente      PA            FI
## 97  4.278127       15       14      16  ausente       S            FO
## 98  4.150279       15       11     181 presente      PA            FO
## 99  5.749866       15       10     192 presente      MA            FI
## 100 5.347643       18        9      62 presente       S            FI
## 101 4.360196       15        9     222  ausente      PA            FI
## 102 4.733328       13        8     196  ausente      PA            FI
## 103 3.882138       16        7     144 presente       S            FO
## 104 5.551141       16       13     266  ausente      MA            FI
## 105 5.463678       18       11     261 presente      PA            FI
## 106 3.959340       17       12     268  ausente      PA            FI
## 107 5.828094       15        9      90 presente       S            FI
## 108 3.457137       15        8     114 presente      PA            FI
## 109 5.357669       19       13     140 presente       S            FI
## 110 5.500264       18        8     231 presente      MA            FO
## 111 5.770627       14       10     297 presente      PA            FI
## 112 5.005355       18       14     140 presente       S            FO
## 113 4.596181       18       13       3 presente      PA            FI
## 114 4.949278       18       10      22 presente       S            FI
## 115 4.579518       17        8     163 presente      MA            FI
## 116 5.777783       16       11     126 presente       S            FO
## 117 5.389719       15       12     291 presente       S            FI
## 118 4.918891       15        8      38 presente       S            FI
## 119 5.294819       18       11     293 presente       S            FI
## 120 5.745108       18        8      43 presente      MA            FI
tib.c = sample_n(df1, 120*1)
tib.c
##      Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1   5.770627       14       10     297 presente      PA            FI
## 2   5.278693       12        9     174  ausente       S            FO
## 3   5.745108       18        8      43 presente      MA            FI
## 4   4.703498       18        5     260 presente      MA            FI
## 5   4.858429       16       14      90  ausente       S            FI
## 6   5.741851       18        8      63 presente      MA            FI
## 7   5.777783       16       11     126 presente       S            FO
## 8   4.596181       18       13       3 presente      PA            FI
## 9   4.978747       16       13      35 presente      MA            FI
## 10  5.810975       16       11     182 presente      PA            FI
## 11  5.945031       16       13     272 presente      PA            FI
## 12  5.756612       16       10     166  ausente       S            FI
## 13  5.347643       18        9      62 presente       S            FI
## 14  4.949278       18       10      22 presente       S            FI
## 15  6.307095       17       10      36 presente      MA            FI
## 16  6.291197       15        8      35 presente      MA            FO
## 17  4.576332       17        8      63  ausente      PA            FI
## 18  6.124436       16       10     172  ausente      MA            FI
## 19  5.992324       16       12     258 presente      PA            FO
## 20  4.865976       19       13     219 presente      MA            FI
## 21  6.202656       15       11     150 presente      MA            FO
## 22  3.989777       17        9      20 presente      MA            FO
## 23  3.008715       17       10      34 presente      PA            FI
## 24  4.967470       16       11     259 presente      MA            FI
## 25  4.121795       15        9     251 presente      PA            FI
## 26  5.827465       18       11     146  ausente      PA            FO
## 27  5.702020       15       11     284 presente      PA            FO
## 28  5.341051       17        8      46 presente      MA            FI
## 29  4.455432       14        9      76  ausente      MA            FI
## 30  5.368891       16        9     141 presente       S            FO
## 31  4.427496       16        9     108 presente      PA            FI
## 32  5.828094       15        9      90 presente       S            FI
## 33  4.407045       15       13      14 presente      MA            FO
## 34  5.872778       15        9      99 presente      PA            FI
## 35  4.850791       17        7      19 presente      MA            FO
## 36  4.614101       16       11     129 presente      PA            FI
## 37  6.058621       14       12     292  ausente       S            FO
## 38  5.551141       16       13     266  ausente      MA            FI
## 39  5.244096       15        9     163  ausente      MA            FI
## 40  4.988360       16       10      24  ausente       S            FI
## 41  5.282284       15        8     256  ausente       S            FI
## 42  4.026518       15       10     299 presente      PA            FO
## 43  3.658050       15        9     149  ausente       S            FO
## 44  4.918891       15        8      38 presente       S            FI
## 45  5.570823       17       15      99 presente      PA            FI
## 46  5.147939       14       11     272  ausente      MA            FO
## 47  4.983138       16       11     285 presente       S            FI
## 48  3.959340       17       12     268  ausente      PA            FI
## 49  4.278127       15       14      16  ausente       S            FO
## 50  5.498807       13       12     296 presente       S            FI
## 51  5.156747       13        9     227 presente      MA            FI
## 52  4.579518       17        8     163 presente      MA            FI
## 53  4.735235       16        9      17  ausente      MA            FI
## 54  5.196912       17        9     183  ausente      MA            FI
## 55  4.462622       17        4     167  ausente      MA            FI
## 56  5.357669       19       13     140 presente       S            FI
## 57  5.168350       17        8     294 presente       S            FI
## 58  4.631105       18       11     257 presente      PA            FI
## 59  5.463678       18       11     261 presente      PA            FI
## 60  5.306467       17       14     161 presente       S            FI
## 61  5.057106       15       10       2 presente       S            FI
## 62  5.437274       19        9     191  ausente      MA            FI
## 63  4.844048       16        7      26 presente      MA            FO
## 64  4.360196       15        9     222  ausente      PA            FI
## 65  3.614348       17        6     225 presente      MA            FI
## 66  4.010872       19       10     171  ausente      MA            FI
## 67  5.389719       15       12     291 presente       S            FI
## 68  7.482596       16       13     106 presente       S            FO
## 69  5.811167       17       14      12 presente      PA            FI
## 70  5.749866       15       10     192 presente      MA            FI
## 71  5.642353       17        8     165 presente      MA            FI
## 72  5.086390       17       12     157 presente      PA            FI
## 73  4.937786       17       13     125 presente      PA            FI
## 74  5.986789       13       10     247  ausente      MA            FI
## 75  5.123132       19       13     175 presente      PA            FI
## 76  4.976547       15       11     238 presente       S            FI
## 77  3.756151       14        8      14  ausente      PA            FO
## 78  4.363459       16       14     175 presente      PA            FI
## 79  5.211317       14       10      28 presente      PA            FI
## 80  5.293377       14       12     258  ausente       S            FO
## 81  4.381293       13       11      64 presente       S            FO
## 82  6.441178       17        7      41 presente       S            FO
## 83  4.531162       13        8     152 presente       S            FI
## 84  5.844751       17       12      56 presente      PA            FI
## 85  4.150279       15       11     181 presente      PA            FO
## 86  4.359705       14       14     224 presente      PA            FI
## 87  4.985391       16        7     126 presente      MA            FI
## 88  5.005355       18       14     140 presente       S            FO
## 89  6.385937       17       10     143 presente       S            FO
## 90  5.151994       18        8      60 presente      MA            FO
## 91  3.470145       13       13      98 presente      MA            FI
## 92  5.418730       14        9     108 presente       S            FI
## 93  6.108589       18       10     162 presente       S            FO
## 94  3.819193       14        6     253 presente      PA            FI
## 95  4.048492       16       12      91 presente      PA            FO
## 96  5.500264       18        8     231 presente      MA            FO
## 97  3.681318       18       11      36 presente       S            FI
## 98  5.294819       18       11     293 presente       S            FI
## 99  4.688809       17       10     138 presente      PA            FO
## 100 3.882138       16        7     144 presente       S            FO
## 101 5.891949       16       15      10  ausente      MA            FO
## 102 6.280048       16        7     230 presente       S            FI
## 103 6.112725       16       16      69  ausente       S            FI
## 104 4.034066       15        9      39 presente      MA            FI
## 105 4.727631       17        9     131 presente      PA            FI
## 106 4.604764       16       15     105 presente       S            FO
## 107 5.370697       17        9      65 presente      PA            FO
## 108 3.512971       18       14     221 presente      MA            FO
## 109 4.979726       17       12     173 presente       S            FI
## 110 3.457137       15        8     114 presente      PA            FI
## 111 5.025019       17        9     252  ausente      PA            FO
## 112 5.845275       13        9      63 presente      PA            FO
## 113 5.328616       15       11     230  ausente      MA            FO
## 114 5.977290       15       17      51 presente      MA            FI
## 115 5.246465       16       10      69 presente      MA            FI
## 116 6.230549       18       11     213 presente       S            FI
## 117 4.609088       17       10      49 presente       S            FO
## 118 6.921230       16       16      57 presente      PA            FO
## 119 6.762958       20       14     218 presente      PA            FO
## 120 4.733328       13        8     196  ausente      PA            FI

##RStudio 1.10 ##Punto 1

select(tib.c, Estatus)
##     Estatus
## 1        PA
## 2         S
## 3        MA
## 4        MA
## 5         S
## 6        MA
## 7         S
## 8        PA
## 9        MA
## 10       PA
## 11       PA
## 12        S
## 13        S
## 14        S
## 15       MA
## 16       MA
## 17       PA
## 18       MA
## 19       PA
## 20       MA
## 21       MA
## 22       MA
## 23       PA
## 24       MA
## 25       PA
## 26       PA
## 27       PA
## 28       MA
## 29       MA
## 30        S
## 31       PA
## 32        S
## 33       MA
## 34       PA
## 35       MA
## 36       PA
## 37        S
## 38       MA
## 39       MA
## 40        S
## 41        S
## 42       PA
## 43        S
## 44        S
## 45       PA
## 46       MA
## 47        S
## 48       PA
## 49        S
## 50        S
## 51       MA
## 52       MA
## 53       MA
## 54       MA
## 55       MA
## 56        S
## 57        S
## 58       PA
## 59       PA
## 60        S
## 61        S
## 62       MA
## 63       MA
## 64       PA
## 65       MA
## 66       MA
## 67        S
## 68        S
## 69       PA
## 70       MA
## 71       MA
## 72       PA
## 73       PA
## 74       MA
## 75       PA
## 76        S
## 77       PA
## 78       PA
## 79       PA
## 80        S
## 81        S
## 82        S
## 83        S
## 84       PA
## 85       PA
## 86       PA
## 87       MA
## 88        S
## 89        S
## 90       MA
## 91       MA
## 92        S
## 93        S
## 94       PA
## 95       PA
## 96       MA
## 97        S
## 98        S
## 99       PA
## 100       S
## 101      MA
## 102       S
## 103       S
## 104      MA
## 105      PA
## 106       S
## 107      PA
## 108      MA
## 109       S
## 110      PA
## 111      PA
## 112      PA
## 113      MA
## 114      MA
## 115      MA
## 116       S
## 117       S
## 118      PA
## 119      PA
## 120      PA

##Punto 2

select(tib.c, (3:6))
##     Flores.d Hojas.d    Plaga Estatus
## 1         10     297 presente      PA
## 2          9     174  ausente       S
## 3          8      43 presente      MA
## 4          5     260 presente      MA
## 5         14      90  ausente       S
## 6          8      63 presente      MA
## 7         11     126 presente       S
## 8         13       3 presente      PA
## 9         13      35 presente      MA
## 10        11     182 presente      PA
## 11        13     272 presente      PA
## 12        10     166  ausente       S
## 13         9      62 presente       S
## 14        10      22 presente       S
## 15        10      36 presente      MA
## 16         8      35 presente      MA
## 17         8      63  ausente      PA
## 18        10     172  ausente      MA
## 19        12     258 presente      PA
## 20        13     219 presente      MA
## 21        11     150 presente      MA
## 22         9      20 presente      MA
## 23        10      34 presente      PA
## 24        11     259 presente      MA
## 25         9     251 presente      PA
## 26        11     146  ausente      PA
## 27        11     284 presente      PA
## 28         8      46 presente      MA
## 29         9      76  ausente      MA
## 30         9     141 presente       S
## 31         9     108 presente      PA
## 32         9      90 presente       S
## 33        13      14 presente      MA
## 34         9      99 presente      PA
## 35         7      19 presente      MA
## 36        11     129 presente      PA
## 37        12     292  ausente       S
## 38        13     266  ausente      MA
## 39         9     163  ausente      MA
## 40        10      24  ausente       S
## 41         8     256  ausente       S
## 42        10     299 presente      PA
## 43         9     149  ausente       S
## 44         8      38 presente       S
## 45        15      99 presente      PA
## 46        11     272  ausente      MA
## 47        11     285 presente       S
## 48        12     268  ausente      PA
## 49        14      16  ausente       S
## 50        12     296 presente       S
## 51         9     227 presente      MA
## 52         8     163 presente      MA
## 53         9      17  ausente      MA
## 54         9     183  ausente      MA
## 55         4     167  ausente      MA
## 56        13     140 presente       S
## 57         8     294 presente       S
## 58        11     257 presente      PA
## 59        11     261 presente      PA
## 60        14     161 presente       S
## 61        10       2 presente       S
## 62         9     191  ausente      MA
## 63         7      26 presente      MA
## 64         9     222  ausente      PA
## 65         6     225 presente      MA
## 66        10     171  ausente      MA
## 67        12     291 presente       S
## 68        13     106 presente       S
## 69        14      12 presente      PA
## 70        10     192 presente      MA
## 71         8     165 presente      MA
## 72        12     157 presente      PA
## 73        13     125 presente      PA
## 74        10     247  ausente      MA
## 75        13     175 presente      PA
## 76        11     238 presente       S
## 77         8      14  ausente      PA
## 78        14     175 presente      PA
## 79        10      28 presente      PA
## 80        12     258  ausente       S
## 81        11      64 presente       S
## 82         7      41 presente       S
## 83         8     152 presente       S
## 84        12      56 presente      PA
## 85        11     181 presente      PA
## 86        14     224 presente      PA
## 87         7     126 presente      MA
## 88        14     140 presente       S
## 89        10     143 presente       S
## 90         8      60 presente      MA
## 91        13      98 presente      MA
## 92         9     108 presente       S
## 93        10     162 presente       S
## 94         6     253 presente      PA
## 95        12      91 presente      PA
## 96         8     231 presente      MA
## 97        11      36 presente       S
## 98        11     293 presente       S
## 99        10     138 presente      PA
## 100        7     144 presente       S
## 101       15      10  ausente      MA
## 102        7     230 presente       S
## 103       16      69  ausente       S
## 104        9      39 presente      MA
## 105        9     131 presente      PA
## 106       15     105 presente       S
## 107        9      65 presente      PA
## 108       14     221 presente      MA
## 109       12     173 presente       S
## 110        8     114 presente      PA
## 111        9     252  ausente      PA
## 112        9      63 presente      PA
## 113       11     230  ausente      MA
## 114       17      51 presente      MA
## 115       10      69 presente      MA
## 116       11     213 presente       S
## 117       10      49 presente       S
## 118       16      57 presente      PA
## 119       14     218 presente      PA
## 120        8     196  ausente      PA

##Punto 3

select(tib.c, !(3:6))
##      Biomasa Flores.r Fertilizacion
## 1   5.770627       14            FI
## 2   5.278693       12            FO
## 3   5.745108       18            FI
## 4   4.703498       18            FI
## 5   4.858429       16            FI
## 6   5.741851       18            FI
## 7   5.777783       16            FO
## 8   4.596181       18            FI
## 9   4.978747       16            FI
## 10  5.810975       16            FI
## 11  5.945031       16            FI
## 12  5.756612       16            FI
## 13  5.347643       18            FI
## 14  4.949278       18            FI
## 15  6.307095       17            FI
## 16  6.291197       15            FO
## 17  4.576332       17            FI
## 18  6.124436       16            FI
## 19  5.992324       16            FO
## 20  4.865976       19            FI
## 21  6.202656       15            FO
## 22  3.989777       17            FO
## 23  3.008715       17            FI
## 24  4.967470       16            FI
## 25  4.121795       15            FI
## 26  5.827465       18            FO
## 27  5.702020       15            FO
## 28  5.341051       17            FI
## 29  4.455432       14            FI
## 30  5.368891       16            FO
## 31  4.427496       16            FI
## 32  5.828094       15            FI
## 33  4.407045       15            FO
## 34  5.872778       15            FI
## 35  4.850791       17            FO
## 36  4.614101       16            FI
## 37  6.058621       14            FO
## 38  5.551141       16            FI
## 39  5.244096       15            FI
## 40  4.988360       16            FI
## 41  5.282284       15            FI
## 42  4.026518       15            FO
## 43  3.658050       15            FO
## 44  4.918891       15            FI
## 45  5.570823       17            FI
## 46  5.147939       14            FO
## 47  4.983138       16            FI
## 48  3.959340       17            FI
## 49  4.278127       15            FO
## 50  5.498807       13            FI
## 51  5.156747       13            FI
## 52  4.579518       17            FI
## 53  4.735235       16            FI
## 54  5.196912       17            FI
## 55  4.462622       17            FI
## 56  5.357669       19            FI
## 57  5.168350       17            FI
## 58  4.631105       18            FI
## 59  5.463678       18            FI
## 60  5.306467       17            FI
## 61  5.057106       15            FI
## 62  5.437274       19            FI
## 63  4.844048       16            FO
## 64  4.360196       15            FI
## 65  3.614348       17            FI
## 66  4.010872       19            FI
## 67  5.389719       15            FI
## 68  7.482596       16            FO
## 69  5.811167       17            FI
## 70  5.749866       15            FI
## 71  5.642353       17            FI
## 72  5.086390       17            FI
## 73  4.937786       17            FI
## 74  5.986789       13            FI
## 75  5.123132       19            FI
## 76  4.976547       15            FI
## 77  3.756151       14            FO
## 78  4.363459       16            FI
## 79  5.211317       14            FI
## 80  5.293377       14            FO
## 81  4.381293       13            FO
## 82  6.441178       17            FO
## 83  4.531162       13            FI
## 84  5.844751       17            FI
## 85  4.150279       15            FO
## 86  4.359705       14            FI
## 87  4.985391       16            FI
## 88  5.005355       18            FO
## 89  6.385937       17            FO
## 90  5.151994       18            FO
## 91  3.470145       13            FI
## 92  5.418730       14            FI
## 93  6.108589       18            FO
## 94  3.819193       14            FI
## 95  4.048492       16            FO
## 96  5.500264       18            FO
## 97  3.681318       18            FI
## 98  5.294819       18            FI
## 99  4.688809       17            FO
## 100 3.882138       16            FO
## 101 5.891949       16            FO
## 102 6.280048       16            FI
## 103 6.112725       16            FI
## 104 4.034066       15            FI
## 105 4.727631       17            FI
## 106 4.604764       16            FO
## 107 5.370697       17            FO
## 108 3.512971       18            FO
## 109 4.979726       17            FI
## 110 3.457137       15            FI
## 111 5.025019       17            FO
## 112 5.845275       13            FO
## 113 5.328616       15            FO
## 114 5.977290       15            FI
## 115 5.246465       16            FI
## 116 6.230549       18            FI
## 117 4.609088       17            FO
## 118 6.921230       16            FO
## 119 6.762958       20            FO
## 120 4.733328       13            FI

##Punto 4

select(tib.c, !ends_with(".d"))
##      Biomasa Flores.r    Plaga Estatus Fertilizacion
## 1   5.770627       14 presente      PA            FI
## 2   5.278693       12  ausente       S            FO
## 3   5.745108       18 presente      MA            FI
## 4   4.703498       18 presente      MA            FI
## 5   4.858429       16  ausente       S            FI
## 6   5.741851       18 presente      MA            FI
## 7   5.777783       16 presente       S            FO
## 8   4.596181       18 presente      PA            FI
## 9   4.978747       16 presente      MA            FI
## 10  5.810975       16 presente      PA            FI
## 11  5.945031       16 presente      PA            FI
## 12  5.756612       16  ausente       S            FI
## 13  5.347643       18 presente       S            FI
## 14  4.949278       18 presente       S            FI
## 15  6.307095       17 presente      MA            FI
## 16  6.291197       15 presente      MA            FO
## 17  4.576332       17  ausente      PA            FI
## 18  6.124436       16  ausente      MA            FI
## 19  5.992324       16 presente      PA            FO
## 20  4.865976       19 presente      MA            FI
## 21  6.202656       15 presente      MA            FO
## 22  3.989777       17 presente      MA            FO
## 23  3.008715       17 presente      PA            FI
## 24  4.967470       16 presente      MA            FI
## 25  4.121795       15 presente      PA            FI
## 26  5.827465       18  ausente      PA            FO
## 27  5.702020       15 presente      PA            FO
## 28  5.341051       17 presente      MA            FI
## 29  4.455432       14  ausente      MA            FI
## 30  5.368891       16 presente       S            FO
## 31  4.427496       16 presente      PA            FI
## 32  5.828094       15 presente       S            FI
## 33  4.407045       15 presente      MA            FO
## 34  5.872778       15 presente      PA            FI
## 35  4.850791       17 presente      MA            FO
## 36  4.614101       16 presente      PA            FI
## 37  6.058621       14  ausente       S            FO
## 38  5.551141       16  ausente      MA            FI
## 39  5.244096       15  ausente      MA            FI
## 40  4.988360       16  ausente       S            FI
## 41  5.282284       15  ausente       S            FI
## 42  4.026518       15 presente      PA            FO
## 43  3.658050       15  ausente       S            FO
## 44  4.918891       15 presente       S            FI
## 45  5.570823       17 presente      PA            FI
## 46  5.147939       14  ausente      MA            FO
## 47  4.983138       16 presente       S            FI
## 48  3.959340       17  ausente      PA            FI
## 49  4.278127       15  ausente       S            FO
## 50  5.498807       13 presente       S            FI
## 51  5.156747       13 presente      MA            FI
## 52  4.579518       17 presente      MA            FI
## 53  4.735235       16  ausente      MA            FI
## 54  5.196912       17  ausente      MA            FI
## 55  4.462622       17  ausente      MA            FI
## 56  5.357669       19 presente       S            FI
## 57  5.168350       17 presente       S            FI
## 58  4.631105       18 presente      PA            FI
## 59  5.463678       18 presente      PA            FI
## 60  5.306467       17 presente       S            FI
## 61  5.057106       15 presente       S            FI
## 62  5.437274       19  ausente      MA            FI
## 63  4.844048       16 presente      MA            FO
## 64  4.360196       15  ausente      PA            FI
## 65  3.614348       17 presente      MA            FI
## 66  4.010872       19  ausente      MA            FI
## 67  5.389719       15 presente       S            FI
## 68  7.482596       16 presente       S            FO
## 69  5.811167       17 presente      PA            FI
## 70  5.749866       15 presente      MA            FI
## 71  5.642353       17 presente      MA            FI
## 72  5.086390       17 presente      PA            FI
## 73  4.937786       17 presente      PA            FI
## 74  5.986789       13  ausente      MA            FI
## 75  5.123132       19 presente      PA            FI
## 76  4.976547       15 presente       S            FI
## 77  3.756151       14  ausente      PA            FO
## 78  4.363459       16 presente      PA            FI
## 79  5.211317       14 presente      PA            FI
## 80  5.293377       14  ausente       S            FO
## 81  4.381293       13 presente       S            FO
## 82  6.441178       17 presente       S            FO
## 83  4.531162       13 presente       S            FI
## 84  5.844751       17 presente      PA            FI
## 85  4.150279       15 presente      PA            FO
## 86  4.359705       14 presente      PA            FI
## 87  4.985391       16 presente      MA            FI
## 88  5.005355       18 presente       S            FO
## 89  6.385937       17 presente       S            FO
## 90  5.151994       18 presente      MA            FO
## 91  3.470145       13 presente      MA            FI
## 92  5.418730       14 presente       S            FI
## 93  6.108589       18 presente       S            FO
## 94  3.819193       14 presente      PA            FI
## 95  4.048492       16 presente      PA            FO
## 96  5.500264       18 presente      MA            FO
## 97  3.681318       18 presente       S            FI
## 98  5.294819       18 presente       S            FI
## 99  4.688809       17 presente      PA            FO
## 100 3.882138       16 presente       S            FO
## 101 5.891949       16  ausente      MA            FO
## 102 6.280048       16 presente       S            FI
## 103 6.112725       16  ausente       S            FI
## 104 4.034066       15 presente      MA            FI
## 105 4.727631       17 presente      PA            FI
## 106 4.604764       16 presente       S            FO
## 107 5.370697       17 presente      PA            FO
## 108 3.512971       18 presente      MA            FO
## 109 4.979726       17 presente       S            FI
## 110 3.457137       15 presente      PA            FI
## 111 5.025019       17  ausente      PA            FO
## 112 5.845275       13 presente      PA            FO
## 113 5.328616       15  ausente      MA            FO
## 114 5.977290       15 presente      MA            FI
## 115 5.246465       16 presente      MA            FI
## 116 6.230549       18 presente       S            FI
## 117 4.609088       17 presente       S            FO
## 118 6.921230       16 presente      PA            FO
## 119 6.762958       20 presente      PA            FO
## 120 4.733328       13  ausente      PA            FI

##Punto 5

select(tib.c, starts_with("Fl"))
##     Flores.r Flores.d
## 1         14       10
## 2         12        9
## 3         18        8
## 4         18        5
## 5         16       14
## 6         18        8
## 7         16       11
## 8         18       13
## 9         16       13
## 10        16       11
## 11        16       13
## 12        16       10
## 13        18        9
## 14        18       10
## 15        17       10
## 16        15        8
## 17        17        8
## 18        16       10
## 19        16       12
## 20        19       13
## 21        15       11
## 22        17        9
## 23        17       10
## 24        16       11
## 25        15        9
## 26        18       11
## 27        15       11
## 28        17        8
## 29        14        9
## 30        16        9
## 31        16        9
## 32        15        9
## 33        15       13
## 34        15        9
## 35        17        7
## 36        16       11
## 37        14       12
## 38        16       13
## 39        15        9
## 40        16       10
## 41        15        8
## 42        15       10
## 43        15        9
## 44        15        8
## 45        17       15
## 46        14       11
## 47        16       11
## 48        17       12
## 49        15       14
## 50        13       12
## 51        13        9
## 52        17        8
## 53        16        9
## 54        17        9
## 55        17        4
## 56        19       13
## 57        17        8
## 58        18       11
## 59        18       11
## 60        17       14
## 61        15       10
## 62        19        9
## 63        16        7
## 64        15        9
## 65        17        6
## 66        19       10
## 67        15       12
## 68        16       13
## 69        17       14
## 70        15       10
## 71        17        8
## 72        17       12
## 73        17       13
## 74        13       10
## 75        19       13
## 76        15       11
## 77        14        8
## 78        16       14
## 79        14       10
## 80        14       12
## 81        13       11
## 82        17        7
## 83        13        8
## 84        17       12
## 85        15       11
## 86        14       14
## 87        16        7
## 88        18       14
## 89        17       10
## 90        18        8
## 91        13       13
## 92        14        9
## 93        18       10
## 94        14        6
## 95        16       12
## 96        18        8
## 97        18       11
## 98        18       11
## 99        17       10
## 100       16        7
## 101       16       15
## 102       16        7
## 103       16       16
## 104       15        9
## 105       17        9
## 106       16       15
## 107       17        9
## 108       18       14
## 109       17       12
## 110       15        8
## 111       17        9
## 112       13        9
## 113       15       11
## 114       15       17
## 115       16       10
## 116       18       11
## 117       17       10
## 118       16       16
## 119       20       14
## 120       13        8

##Punto 6

select(tib.c, starts_with("F") & ends_with(".d"))
##     Flores.d
## 1         10
## 2          9
## 3          8
## 4          5
## 5         14
## 6          8
## 7         11
## 8         13
## 9         13
## 10        11
## 11        13
## 12        10
## 13         9
## 14        10
## 15        10
## 16         8
## 17         8
## 18        10
## 19        12
## 20        13
## 21        11
## 22         9
## 23        10
## 24        11
## 25         9
## 26        11
## 27        11
## 28         8
## 29         9
## 30         9
## 31         9
## 32         9
## 33        13
## 34         9
## 35         7
## 36        11
## 37        12
## 38        13
## 39         9
## 40        10
## 41         8
## 42        10
## 43         9
## 44         8
## 45        15
## 46        11
## 47        11
## 48        12
## 49        14
## 50        12
## 51         9
## 52         8
## 53         9
## 54         9
## 55         4
## 56        13
## 57         8
## 58        11
## 59        11
## 60        14
## 61        10
## 62         9
## 63         7
## 64         9
## 65         6
## 66        10
## 67        12
## 68        13
## 69        14
## 70        10
## 71         8
## 72        12
## 73        13
## 74        10
## 75        13
## 76        11
## 77         8
## 78        14
## 79        10
## 80        12
## 81        11
## 82         7
## 83         8
## 84        12
## 85        11
## 86        14
## 87         7
## 88        14
## 89        10
## 90         8
## 91        13
## 92         9
## 93        10
## 94         6
## 95        12
## 96         8
## 97        11
## 98        11
## 99        10
## 100        7
## 101       15
## 102        7
## 103       16
## 104        9
## 105        9
## 106       15
## 107        9
## 108       14
## 109       12
## 110        8
## 111        9
## 112        9
## 113       11
## 114       17
## 115       10
## 116       11
## 117       10
## 118       16
## 119       14
## 120        8

##Punto 7

tib.c %>% group_by(Estatus)%>% select(Hojas.d)
## Adding missing grouping variables: `Estatus`
## # A tibble: 120 x 2
## # Groups:   Estatus [3]
##    Estatus Hojas.d
##    <fct>     <int>
##  1 PA          297
##  2 S           174
##  3 MA           43
##  4 MA          260
##  5 S            90
##  6 MA           63
##  7 S           126
##  8 PA            3
##  9 MA           35
## 10 PA          182
## # ... with 110 more rows
var_estatus = tib.c %>% group_by(Estatus)%>% select(Hojas.d)
## Adding missing grouping variables: `Estatus`

##Punto 8

var_estatus %>% arrange(desc(Hojas.d), by_group = TRUE)
## # A tibble: 120 x 2
## # Groups:   Estatus [3]
##    Estatus Hojas.d
##    <fct>     <int>
##  1 PA          299
##  2 PA          297
##  3 S           296
##  4 S           294
##  5 S           293
##  6 S           292
##  7 S           291
##  8 S           285
##  9 PA          284
## 10 PA          272
## # ... with 110 more rows

##Punto 9

tib.c %>%  select(starts_with("Flores"), Estatus) %>% 
                           filter(Estatus == "MA")
##    Flores.r Flores.d Estatus
## 1        18        8      MA
## 2        18        5      MA
## 3        18        8      MA
## 4        16       13      MA
## 5        17       10      MA
## 6        15        8      MA
## 7        16       10      MA
## 8        19       13      MA
## 9        15       11      MA
## 10       17        9      MA
## 11       16       11      MA
## 12       17        8      MA
## 13       14        9      MA
## 14       15       13      MA
## 15       17        7      MA
## 16       16       13      MA
## 17       15        9      MA
## 18       14       11      MA
## 19       13        9      MA
## 20       17        8      MA
## 21       16        9      MA
## 22       17        9      MA
## 23       17        4      MA
## 24       19        9      MA
## 25       16        7      MA
## 26       17        6      MA
## 27       19       10      MA
## 28       15       10      MA
## 29       17        8      MA
## 30       13       10      MA
## 31       16        7      MA
## 32       18        8      MA
## 33       13       13      MA
## 34       18        8      MA
## 35       16       15      MA
## 36       15        9      MA
## 37       18       14      MA
## 38       15       11      MA
## 39       15       17      MA
## 40       16       10      MA

##Punto 10

tib.c %>% filter(Biomasa > 5)
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  5.770627       14       10     297 presente      PA            FI
## 2  5.278693       12        9     174  ausente       S            FO
## 3  5.745108       18        8      43 presente      MA            FI
## 4  5.741851       18        8      63 presente      MA            FI
## 5  5.777783       16       11     126 presente       S            FO
## 6  5.810975       16       11     182 presente      PA            FI
## 7  5.945031       16       13     272 presente      PA            FI
## 8  5.756612       16       10     166  ausente       S            FI
## 9  5.347643       18        9      62 presente       S            FI
## 10 6.307095       17       10      36 presente      MA            FI
## 11 6.291197       15        8      35 presente      MA            FO
## 12 6.124436       16       10     172  ausente      MA            FI
## 13 5.992324       16       12     258 presente      PA            FO
## 14 6.202656       15       11     150 presente      MA            FO
## 15 5.827465       18       11     146  ausente      PA            FO
## 16 5.702020       15       11     284 presente      PA            FO
## 17 5.341051       17        8      46 presente      MA            FI
## 18 5.368891       16        9     141 presente       S            FO
## 19 5.828094       15        9      90 presente       S            FI
## 20 5.872778       15        9      99 presente      PA            FI
## 21 6.058621       14       12     292  ausente       S            FO
## 22 5.551141       16       13     266  ausente      MA            FI
## 23 5.244096       15        9     163  ausente      MA            FI
## 24 5.282284       15        8     256  ausente       S            FI
## 25 5.570823       17       15      99 presente      PA            FI
## 26 5.147939       14       11     272  ausente      MA            FO
## 27 5.498807       13       12     296 presente       S            FI
## 28 5.156747       13        9     227 presente      MA            FI
## 29 5.196912       17        9     183  ausente      MA            FI
## 30 5.357669       19       13     140 presente       S            FI
## 31 5.168350       17        8     294 presente       S            FI
## 32 5.463678       18       11     261 presente      PA            FI
## 33 5.306467       17       14     161 presente       S            FI
## 34 5.057106       15       10       2 presente       S            FI
## 35 5.437274       19        9     191  ausente      MA            FI
## 36 5.389719       15       12     291 presente       S            FI
## 37 7.482596       16       13     106 presente       S            FO
## 38 5.811167       17       14      12 presente      PA            FI
## 39 5.749866       15       10     192 presente      MA            FI
## 40 5.642353       17        8     165 presente      MA            FI
## 41 5.086390       17       12     157 presente      PA            FI
## 42 5.986789       13       10     247  ausente      MA            FI
## 43 5.123132       19       13     175 presente      PA            FI
## 44 5.211317       14       10      28 presente      PA            FI
## 45 5.293377       14       12     258  ausente       S            FO
## 46 6.441178       17        7      41 presente       S            FO
## 47 5.844751       17       12      56 presente      PA            FI
## 48 5.005355       18       14     140 presente       S            FO
## 49 6.385937       17       10     143 presente       S            FO
## 50 5.151994       18        8      60 presente      MA            FO
## 51 5.418730       14        9     108 presente       S            FI
## 52 6.108589       18       10     162 presente       S            FO
## 53 5.500264       18        8     231 presente      MA            FO
## 54 5.294819       18       11     293 presente       S            FI
## 55 5.891949       16       15      10  ausente      MA            FO
## 56 6.280048       16        7     230 presente       S            FI
## 57 6.112725       16       16      69  ausente       S            FI
## 58 5.370697       17        9      65 presente      PA            FO
## 59 5.025019       17        9     252  ausente      PA            FO
## 60 5.845275       13        9      63 presente      PA            FO
## 61 5.328616       15       11     230  ausente      MA            FO
## 62 5.977290       15       17      51 presente      MA            FI
## 63 5.246465       16       10      69 presente      MA            FI
## 64 6.230549       18       11     213 presente       S            FI
## 65 6.921230       16       16      57 presente      PA            FO
## 66 6.762958       20       14     218 presente      PA            FO

##Punto 11

tib.c %>% filter(Estatus == 'PA'& Fertilizacion == 'FO')
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  5.992324       16       12     258 presente      PA            FO
## 2  5.827465       18       11     146  ausente      PA            FO
## 3  5.702020       15       11     284 presente      PA            FO
## 4  4.026518       15       10     299 presente      PA            FO
## 5  3.756151       14        8      14  ausente      PA            FO
## 6  4.150279       15       11     181 presente      PA            FO
## 7  4.048492       16       12      91 presente      PA            FO
## 8  4.688809       17       10     138 presente      PA            FO
## 9  5.370697       17        9      65 presente      PA            FO
## 10 5.025019       17        9     252  ausente      PA            FO
## 11 5.845275       13        9      63 presente      PA            FO
## 12 6.921230       16       16      57 presente      PA            FO
## 13 6.762958       20       14     218 presente      PA            FO

##Punto 12

tib.c %>% filter(Estatus == 'PA'| Fertilizacion == 'FI')
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  5.770627       14       10     297 presente      PA            FI
## 2  5.745108       18        8      43 presente      MA            FI
## 3  4.703498       18        5     260 presente      MA            FI
## 4  4.858429       16       14      90  ausente       S            FI
## 5  5.741851       18        8      63 presente      MA            FI
## 6  4.596181       18       13       3 presente      PA            FI
## 7  4.978747       16       13      35 presente      MA            FI
## 8  5.810975       16       11     182 presente      PA            FI
## 9  5.945031       16       13     272 presente      PA            FI
## 10 5.756612       16       10     166  ausente       S            FI
## 11 5.347643       18        9      62 presente       S            FI
## 12 4.949278       18       10      22 presente       S            FI
## 13 6.307095       17       10      36 presente      MA            FI
## 14 4.576332       17        8      63  ausente      PA            FI
## 15 6.124436       16       10     172  ausente      MA            FI
## 16 5.992324       16       12     258 presente      PA            FO
## 17 4.865976       19       13     219 presente      MA            FI
## 18 3.008715       17       10      34 presente      PA            FI
## 19 4.967470       16       11     259 presente      MA            FI
## 20 4.121795       15        9     251 presente      PA            FI
## 21 5.827465       18       11     146  ausente      PA            FO
## 22 5.702020       15       11     284 presente      PA            FO
## 23 5.341051       17        8      46 presente      MA            FI
## 24 4.455432       14        9      76  ausente      MA            FI
## 25 4.427496       16        9     108 presente      PA            FI
## 26 5.828094       15        9      90 presente       S            FI
## 27 5.872778       15        9      99 presente      PA            FI
## 28 4.614101       16       11     129 presente      PA            FI
## 29 5.551141       16       13     266  ausente      MA            FI
## 30 5.244096       15        9     163  ausente      MA            FI
## 31 4.988360       16       10      24  ausente       S            FI
## 32 5.282284       15        8     256  ausente       S            FI
## 33 4.026518       15       10     299 presente      PA            FO
## 34 4.918891       15        8      38 presente       S            FI
## 35 5.570823       17       15      99 presente      PA            FI
## 36 4.983138       16       11     285 presente       S            FI
## 37 3.959340       17       12     268  ausente      PA            FI
## 38 5.498807       13       12     296 presente       S            FI
## 39 5.156747       13        9     227 presente      MA            FI
## 40 4.579518       17        8     163 presente      MA            FI
## 41 4.735235       16        9      17  ausente      MA            FI
## 42 5.196912       17        9     183  ausente      MA            FI
## 43 4.462622       17        4     167  ausente      MA            FI
## 44 5.357669       19       13     140 presente       S            FI
## 45 5.168350       17        8     294 presente       S            FI
## 46 4.631105       18       11     257 presente      PA            FI
## 47 5.463678       18       11     261 presente      PA            FI
## 48 5.306467       17       14     161 presente       S            FI
## 49 5.057106       15       10       2 presente       S            FI
## 50 5.437274       19        9     191  ausente      MA            FI
## 51 4.360196       15        9     222  ausente      PA            FI
## 52 3.614348       17        6     225 presente      MA            FI
## 53 4.010872       19       10     171  ausente      MA            FI
## 54 5.389719       15       12     291 presente       S            FI
## 55 5.811167       17       14      12 presente      PA            FI
## 56 5.749866       15       10     192 presente      MA            FI
## 57 5.642353       17        8     165 presente      MA            FI
## 58 5.086390       17       12     157 presente      PA            FI
## 59 4.937786       17       13     125 presente      PA            FI
## 60 5.986789       13       10     247  ausente      MA            FI
## 61 5.123132       19       13     175 presente      PA            FI
## 62 4.976547       15       11     238 presente       S            FI
## 63 3.756151       14        8      14  ausente      PA            FO
## 64 4.363459       16       14     175 presente      PA            FI
## 65 5.211317       14       10      28 presente      PA            FI
## 66 4.531162       13        8     152 presente       S            FI
## 67 5.844751       17       12      56 presente      PA            FI
## 68 4.150279       15       11     181 presente      PA            FO
## 69 4.359705       14       14     224 presente      PA            FI
## 70 4.985391       16        7     126 presente      MA            FI
## 71 3.470145       13       13      98 presente      MA            FI
## 72 5.418730       14        9     108 presente       S            FI
## 73 3.819193       14        6     253 presente      PA            FI
## 74 4.048492       16       12      91 presente      PA            FO
## 75 3.681318       18       11      36 presente       S            FI
## 76 5.294819       18       11     293 presente       S            FI
## 77 4.688809       17       10     138 presente      PA            FO
## 78 6.280048       16        7     230 presente       S            FI
## 79 6.112725       16       16      69  ausente       S            FI
## 80 4.034066       15        9      39 presente      MA            FI
## 81 4.727631       17        9     131 presente      PA            FI
## 82 5.370697       17        9      65 presente      PA            FO
## 83 4.979726       17       12     173 presente       S            FI
## 84 3.457137       15        8     114 presente      PA            FI
## 85 5.025019       17        9     252  ausente      PA            FO
## 86 5.845275       13        9      63 presente      PA            FO
## 87 5.977290       15       17      51 presente      MA            FI
## 88 5.246465       16       10      69 presente      MA            FI
## 89 6.230549       18       11     213 presente       S            FI
## 90 6.921230       16       16      57 presente      PA            FO
## 91 6.762958       20       14     218 presente      PA            FO
## 92 4.733328       13        8     196  ausente      PA            FI

##Punto 13

filter(tib.c , Flores.d > median(Flores.d)) %>% 
  arrange(Plaga)
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  4.858429       16       14      90  ausente       S            FI
## 2  5.827465       18       11     146  ausente      PA            FO
## 3  6.058621       14       12     292  ausente       S            FO
## 4  5.551141       16       13     266  ausente      MA            FI
## 5  5.147939       14       11     272  ausente      MA            FO
## 6  3.959340       17       12     268  ausente      PA            FI
## 7  4.278127       15       14      16  ausente       S            FO
## 8  5.293377       14       12     258  ausente       S            FO
## 9  5.891949       16       15      10  ausente      MA            FO
## 10 6.112725       16       16      69  ausente       S            FI
## 11 5.328616       15       11     230  ausente      MA            FO
## 12 5.777783       16       11     126 presente       S            FO
## 13 4.596181       18       13       3 presente      PA            FI
## 14 4.978747       16       13      35 presente      MA            FI
## 15 5.810975       16       11     182 presente      PA            FI
## 16 5.945031       16       13     272 presente      PA            FI
## 17 5.992324       16       12     258 presente      PA            FO
## 18 4.865976       19       13     219 presente      MA            FI
## 19 6.202656       15       11     150 presente      MA            FO
## 20 4.967470       16       11     259 presente      MA            FI
## 21 5.702020       15       11     284 presente      PA            FO
## 22 4.407045       15       13      14 presente      MA            FO
## 23 4.614101       16       11     129 presente      PA            FI
## 24 5.570823       17       15      99 presente      PA            FI
## 25 4.983138       16       11     285 presente       S            FI
## 26 5.498807       13       12     296 presente       S            FI
## 27 5.357669       19       13     140 presente       S            FI
## 28 4.631105       18       11     257 presente      PA            FI
## 29 5.463678       18       11     261 presente      PA            FI
## 30 5.306467       17       14     161 presente       S            FI
## 31 5.389719       15       12     291 presente       S            FI
## 32 7.482596       16       13     106 presente       S            FO
## 33 5.811167       17       14      12 presente      PA            FI
## 34 5.086390       17       12     157 presente      PA            FI
## 35 4.937786       17       13     125 presente      PA            FI
## 36 5.123132       19       13     175 presente      PA            FI
## 37 4.976547       15       11     238 presente       S            FI
## 38 4.363459       16       14     175 presente      PA            FI
## 39 4.381293       13       11      64 presente       S            FO
## 40 5.844751       17       12      56 presente      PA            FI
## 41 4.150279       15       11     181 presente      PA            FO
## 42 4.359705       14       14     224 presente      PA            FI
## 43 5.005355       18       14     140 presente       S            FO
## 44 3.470145       13       13      98 presente      MA            FI
## 45 4.048492       16       12      91 presente      PA            FO
## 46 3.681318       18       11      36 presente       S            FI
## 47 5.294819       18       11     293 presente       S            FI
## 48 4.604764       16       15     105 presente       S            FO
## 49 3.512971       18       14     221 presente      MA            FO
## 50 4.979726       17       12     173 presente       S            FI
## 51 5.977290       15       17      51 presente      MA            FI
## 52 6.230549       18       11     213 presente       S            FI
## 53 6.921230       16       16      57 presente      PA            FO
## 54 6.762958       20       14     218 presente      PA            FO

##Punto 14

filter(tic.i, Flores.d > median(Flores.d, na.rm = TRUE))
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  4.983138       16       11     285 presente       S            FI
## 2  3.681318       18       11      36 presente       S            FI
## 3  6.112725       16       16      69  ausente       S            FI
## 4  6.921230       16       16      57 presente      PA            FO
## 5  5.357669       19       13     140 presente       S            FI
## 6  6.230549       18       11     213 presente       S            FI
## 7  5.810975       16       11     182 presente      PA            FI
## 8  4.381293       13       11      64 presente       S            FO
## 9  5.945031       16       13     272 presente      PA            FI
## 10 5.293377       14       12     258  ausente       S            FO
## 11 5.123132       19       13     175 presente      PA            FI
## 12 4.976547       15       11     238 presente       S            FI
## 13 4.979726       17       12     173 presente       S            FI
## 14 5.086390       17       12     157 presente      PA            FI
## 15 4.967470       16       11     259 presente      MA            FI
## 16 5.844751       17       12      56 presente      PA            FI
## 17 5.294819       18       11     293 presente       S            FI
## 18 4.407045       15       13      14 presente      MA            FO
## 19 5.570823       17       15      99 presente      PA            FI
## 20 5.306467       17       14     161 presente       S            FI
## 21 5.992324       16       12     258 presente      PA            FO
## 22 4.937786       17       13     125 presente      PA            FI
## 23 4.359705       14       14     224 presente      PA            FI
## 24 5.498807       13       12     296 presente       S            FI
## 25 5.891949       16       15      10  ausente      MA            FO
## 26 5.005355       18       14     140 presente       S            FO
## 27 5.811167       17       14      12 presente      PA            FI
## 28 4.048492       16       12      91 presente      PA            FO
## 29 5.827465       18       11     146  ausente      PA            FO
## 30 4.865976       19       13     219 presente      MA            FI
## 31 5.389719       15       12     291 presente       S            FI
## 32 5.328616       15       11     230  ausente      MA            FO
## 33 3.959340       17       12     268  ausente      PA            FI
## 34 5.777783       16       11     126 presente       S            FO
## 35 3.512971       18       14     221 presente      MA            FO
## 36 4.614101       16       11     129 presente      PA            FI
## 37 6.058621       14       12     292  ausente       S            FO
## 38 4.278127       15       14      16  ausente       S            FO
## 39 5.551141       16       13     266  ausente      MA            FI
## 40 7.482596       16       13     106 presente       S            FO
m.c = median(tib.c$Flores.d)
m.i = median(tic.i$Flores.d, na.rm = TRUE)
data.frame(m.c, m.i)
##   m.c m.i
## 1  10  10

##Punto 15

v1 = c(tib.c$Biomasa, tib.c$Hojas.d)
Cuartil1 = quantile(x = tib.c$Biomasa, 0.25)
Cuartil2 = quantile(x = tib.c$Hojas.d, 0.75)
v2 = c(Cuartil1, Cuartil2)

tib.c %>% filter ( v1[[1]] > v2[[1]]) %>% arrange(Biomasa)
##      Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1   3.008715       17       10      34 presente      PA            FI
## 2   3.457137       15        8     114 presente      PA            FI
## 3   3.470145       13       13      98 presente      MA            FI
## 4   3.512971       18       14     221 presente      MA            FO
## 5   3.614348       17        6     225 presente      MA            FI
## 6   3.658050       15        9     149  ausente       S            FO
## 7   3.681318       18       11      36 presente       S            FI
## 8   3.756151       14        8      14  ausente      PA            FO
## 9   3.819193       14        6     253 presente      PA            FI
## 10  3.882138       16        7     144 presente       S            FO
## 11  3.959340       17       12     268  ausente      PA            FI
## 12  3.989777       17        9      20 presente      MA            FO
## 13  4.010872       19       10     171  ausente      MA            FI
## 14  4.026518       15       10     299 presente      PA            FO
## 15  4.034066       15        9      39 presente      MA            FI
## 16  4.048492       16       12      91 presente      PA            FO
## 17  4.121795       15        9     251 presente      PA            FI
## 18  4.150279       15       11     181 presente      PA            FO
## 19  4.278127       15       14      16  ausente       S            FO
## 20  4.359705       14       14     224 presente      PA            FI
## 21  4.360196       15        9     222  ausente      PA            FI
## 22  4.363459       16       14     175 presente      PA            FI
## 23  4.381293       13       11      64 presente       S            FO
## 24  4.407045       15       13      14 presente      MA            FO
## 25  4.427496       16        9     108 presente      PA            FI
## 26  4.455432       14        9      76  ausente      MA            FI
## 27  4.462622       17        4     167  ausente      MA            FI
## 28  4.531162       13        8     152 presente       S            FI
## 29  4.576332       17        8      63  ausente      PA            FI
## 30  4.579518       17        8     163 presente      MA            FI
## 31  4.596181       18       13       3 presente      PA            FI
## 32  4.604764       16       15     105 presente       S            FO
## 33  4.609088       17       10      49 presente       S            FO
## 34  4.614101       16       11     129 presente      PA            FI
## 35  4.631105       18       11     257 presente      PA            FI
## 36  4.688809       17       10     138 presente      PA            FO
## 37  4.703498       18        5     260 presente      MA            FI
## 38  4.727631       17        9     131 presente      PA            FI
## 39  4.733328       13        8     196  ausente      PA            FI
## 40  4.735235       16        9      17  ausente      MA            FI
## 41  4.844048       16        7      26 presente      MA            FO
## 42  4.850791       17        7      19 presente      MA            FO
## 43  4.858429       16       14      90  ausente       S            FI
## 44  4.865976       19       13     219 presente      MA            FI
## 45  4.918891       15        8      38 presente       S            FI
## 46  4.937786       17       13     125 presente      PA            FI
## 47  4.949278       18       10      22 presente       S            FI
## 48  4.967470       16       11     259 presente      MA            FI
## 49  4.976547       15       11     238 presente       S            FI
## 50  4.978747       16       13      35 presente      MA            FI
## 51  4.979726       17       12     173 presente       S            FI
## 52  4.983138       16       11     285 presente       S            FI
## 53  4.985391       16        7     126 presente      MA            FI
## 54  4.988360       16       10      24  ausente       S            FI
## 55  5.005355       18       14     140 presente       S            FO
## 56  5.025019       17        9     252  ausente      PA            FO
## 57  5.057106       15       10       2 presente       S            FI
## 58  5.086390       17       12     157 presente      PA            FI
## 59  5.123132       19       13     175 presente      PA            FI
## 60  5.147939       14       11     272  ausente      MA            FO
## 61  5.151994       18        8      60 presente      MA            FO
## 62  5.156747       13        9     227 presente      MA            FI
## 63  5.168350       17        8     294 presente       S            FI
## 64  5.196912       17        9     183  ausente      MA            FI
## 65  5.211317       14       10      28 presente      PA            FI
## 66  5.244096       15        9     163  ausente      MA            FI
## 67  5.246465       16       10      69 presente      MA            FI
## 68  5.278693       12        9     174  ausente       S            FO
## 69  5.282284       15        8     256  ausente       S            FI
## 70  5.293377       14       12     258  ausente       S            FO
## 71  5.294819       18       11     293 presente       S            FI
## 72  5.306467       17       14     161 presente       S            FI
## 73  5.328616       15       11     230  ausente      MA            FO
## 74  5.341051       17        8      46 presente      MA            FI
## 75  5.347643       18        9      62 presente       S            FI
## 76  5.357669       19       13     140 presente       S            FI
## 77  5.368891       16        9     141 presente       S            FO
## 78  5.370697       17        9      65 presente      PA            FO
## 79  5.389719       15       12     291 presente       S            FI
## 80  5.418730       14        9     108 presente       S            FI
## 81  5.437274       19        9     191  ausente      MA            FI
## 82  5.463678       18       11     261 presente      PA            FI
## 83  5.498807       13       12     296 presente       S            FI
## 84  5.500264       18        8     231 presente      MA            FO
## 85  5.551141       16       13     266  ausente      MA            FI
## 86  5.570823       17       15      99 presente      PA            FI
## 87  5.642353       17        8     165 presente      MA            FI
## 88  5.702020       15       11     284 presente      PA            FO
## 89  5.741851       18        8      63 presente      MA            FI
## 90  5.745108       18        8      43 presente      MA            FI
## 91  5.749866       15       10     192 presente      MA            FI
## 92  5.756612       16       10     166  ausente       S            FI
## 93  5.770627       14       10     297 presente      PA            FI
## 94  5.777783       16       11     126 presente       S            FO
## 95  5.810975       16       11     182 presente      PA            FI
## 96  5.811167       17       14      12 presente      PA            FI
## 97  5.827465       18       11     146  ausente      PA            FO
## 98  5.828094       15        9      90 presente       S            FI
## 99  5.844751       17       12      56 presente      PA            FI
## 100 5.845275       13        9      63 presente      PA            FO
## 101 5.872778       15        9      99 presente      PA            FI
## 102 5.891949       16       15      10  ausente      MA            FO
## 103 5.945031       16       13     272 presente      PA            FI
## 104 5.977290       15       17      51 presente      MA            FI
## 105 5.986789       13       10     247  ausente      MA            FI
## 106 5.992324       16       12     258 presente      PA            FO
## 107 6.058621       14       12     292  ausente       S            FO
## 108 6.108589       18       10     162 presente       S            FO
## 109 6.112725       16       16      69  ausente       S            FI
## 110 6.124436       16       10     172  ausente      MA            FI
## 111 6.202656       15       11     150 presente      MA            FO
## 112 6.230549       18       11     213 presente       S            FI
## 113 6.280048       16        7     230 presente       S            FI
## 114 6.291197       15        8      35 presente      MA            FO
## 115 6.307095       17       10      36 presente      MA            FI
## 116 6.385937       17       10     143 presente       S            FO
## 117 6.441178       17        7      41 presente       S            FO
## 118 6.762958       20       14     218 presente      PA            FO
## 119 6.921230       16       16      57 presente      PA            FO
## 120 7.482596       16       13     106 presente       S            FO

##Punto 16

tib.e = tib.c %>% mutate(Biomasa.estandarizada = scale(Biomasa), 
                         Flores.r.estandarizada = (Flores.r- min(Flores.r))/ (max(Flores.r-min(Flores.r))), 
                         Flores.d.estandarizada = (Flores.d- min(Flores.d))/ (max(Flores.d-min(Flores.d))), 
                         Hojas.d.estandarizada = (Hojas.d- min(Hojas.d))/ (max(Hojas.d-min(Hojas.d))))
tib.e
##      Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1   5.770627       14       10     297 presente      PA            FI
## 2   5.278693       12        9     174  ausente       S            FO
## 3   5.745108       18        8      43 presente      MA            FI
## 4   4.703498       18        5     260 presente      MA            FI
## 5   4.858429       16       14      90  ausente       S            FI
## 6   5.741851       18        8      63 presente      MA            FI
## 7   5.777783       16       11     126 presente       S            FO
## 8   4.596181       18       13       3 presente      PA            FI
## 9   4.978747       16       13      35 presente      MA            FI
## 10  5.810975       16       11     182 presente      PA            FI
## 11  5.945031       16       13     272 presente      PA            FI
## 12  5.756612       16       10     166  ausente       S            FI
## 13  5.347643       18        9      62 presente       S            FI
## 14  4.949278       18       10      22 presente       S            FI
## 15  6.307095       17       10      36 presente      MA            FI
## 16  6.291197       15        8      35 presente      MA            FO
## 17  4.576332       17        8      63  ausente      PA            FI
## 18  6.124436       16       10     172  ausente      MA            FI
## 19  5.992324       16       12     258 presente      PA            FO
## 20  4.865976       19       13     219 presente      MA            FI
## 21  6.202656       15       11     150 presente      MA            FO
## 22  3.989777       17        9      20 presente      MA            FO
## 23  3.008715       17       10      34 presente      PA            FI
## 24  4.967470       16       11     259 presente      MA            FI
## 25  4.121795       15        9     251 presente      PA            FI
## 26  5.827465       18       11     146  ausente      PA            FO
## 27  5.702020       15       11     284 presente      PA            FO
## 28  5.341051       17        8      46 presente      MA            FI
## 29  4.455432       14        9      76  ausente      MA            FI
## 30  5.368891       16        9     141 presente       S            FO
## 31  4.427496       16        9     108 presente      PA            FI
## 32  5.828094       15        9      90 presente       S            FI
## 33  4.407045       15       13      14 presente      MA            FO
## 34  5.872778       15        9      99 presente      PA            FI
## 35  4.850791       17        7      19 presente      MA            FO
## 36  4.614101       16       11     129 presente      PA            FI
## 37  6.058621       14       12     292  ausente       S            FO
## 38  5.551141       16       13     266  ausente      MA            FI
## 39  5.244096       15        9     163  ausente      MA            FI
## 40  4.988360       16       10      24  ausente       S            FI
## 41  5.282284       15        8     256  ausente       S            FI
## 42  4.026518       15       10     299 presente      PA            FO
## 43  3.658050       15        9     149  ausente       S            FO
## 44  4.918891       15        8      38 presente       S            FI
## 45  5.570823       17       15      99 presente      PA            FI
## 46  5.147939       14       11     272  ausente      MA            FO
## 47  4.983138       16       11     285 presente       S            FI
## 48  3.959340       17       12     268  ausente      PA            FI
## 49  4.278127       15       14      16  ausente       S            FO
## 50  5.498807       13       12     296 presente       S            FI
## 51  5.156747       13        9     227 presente      MA            FI
## 52  4.579518       17        8     163 presente      MA            FI
## 53  4.735235       16        9      17  ausente      MA            FI
## 54  5.196912       17        9     183  ausente      MA            FI
## 55  4.462622       17        4     167  ausente      MA            FI
## 56  5.357669       19       13     140 presente       S            FI
## 57  5.168350       17        8     294 presente       S            FI
## 58  4.631105       18       11     257 presente      PA            FI
## 59  5.463678       18       11     261 presente      PA            FI
## 60  5.306467       17       14     161 presente       S            FI
## 61  5.057106       15       10       2 presente       S            FI
## 62  5.437274       19        9     191  ausente      MA            FI
## 63  4.844048       16        7      26 presente      MA            FO
## 64  4.360196       15        9     222  ausente      PA            FI
## 65  3.614348       17        6     225 presente      MA            FI
## 66  4.010872       19       10     171  ausente      MA            FI
## 67  5.389719       15       12     291 presente       S            FI
## 68  7.482596       16       13     106 presente       S            FO
## 69  5.811167       17       14      12 presente      PA            FI
## 70  5.749866       15       10     192 presente      MA            FI
## 71  5.642353       17        8     165 presente      MA            FI
## 72  5.086390       17       12     157 presente      PA            FI
## 73  4.937786       17       13     125 presente      PA            FI
## 74  5.986789       13       10     247  ausente      MA            FI
## 75  5.123132       19       13     175 presente      PA            FI
## 76  4.976547       15       11     238 presente       S            FI
## 77  3.756151       14        8      14  ausente      PA            FO
## 78  4.363459       16       14     175 presente      PA            FI
## 79  5.211317       14       10      28 presente      PA            FI
## 80  5.293377       14       12     258  ausente       S            FO
## 81  4.381293       13       11      64 presente       S            FO
## 82  6.441178       17        7      41 presente       S            FO
## 83  4.531162       13        8     152 presente       S            FI
## 84  5.844751       17       12      56 presente      PA            FI
## 85  4.150279       15       11     181 presente      PA            FO
## 86  4.359705       14       14     224 presente      PA            FI
## 87  4.985391       16        7     126 presente      MA            FI
## 88  5.005355       18       14     140 presente       S            FO
## 89  6.385937       17       10     143 presente       S            FO
## 90  5.151994       18        8      60 presente      MA            FO
## 91  3.470145       13       13      98 presente      MA            FI
## 92  5.418730       14        9     108 presente       S            FI
## 93  6.108589       18       10     162 presente       S            FO
## 94  3.819193       14        6     253 presente      PA            FI
## 95  4.048492       16       12      91 presente      PA            FO
## 96  5.500264       18        8     231 presente      MA            FO
## 97  3.681318       18       11      36 presente       S            FI
## 98  5.294819       18       11     293 presente       S            FI
## 99  4.688809       17       10     138 presente      PA            FO
## 100 3.882138       16        7     144 presente       S            FO
## 101 5.891949       16       15      10  ausente      MA            FO
## 102 6.280048       16        7     230 presente       S            FI
## 103 6.112725       16       16      69  ausente       S            FI
## 104 4.034066       15        9      39 presente      MA            FI
## 105 4.727631       17        9     131 presente      PA            FI
## 106 4.604764       16       15     105 presente       S            FO
## 107 5.370697       17        9      65 presente      PA            FO
## 108 3.512971       18       14     221 presente      MA            FO
## 109 4.979726       17       12     173 presente       S            FI
## 110 3.457137       15        8     114 presente      PA            FI
## 111 5.025019       17        9     252  ausente      PA            FO
## 112 5.845275       13        9      63 presente      PA            FO
## 113 5.328616       15       11     230  ausente      MA            FO
## 114 5.977290       15       17      51 presente      MA            FI
## 115 5.246465       16       10      69 presente      MA            FI
## 116 6.230549       18       11     213 presente       S            FI
## 117 4.609088       17       10      49 presente       S            FO
## 118 6.921230       16       16      57 presente      PA            FO
## 119 6.762958       20       14     218 presente      PA            FO
## 120 4.733328       13        8     196  ausente      PA            FI
##     Biomasa.estandarizada Flores.r.estandarizada Flores.d.estandarizada
## 1              0.81839125                  0.250             0.46153846
## 2              0.21383358                  0.000             0.38461538
## 3              0.78703085                  0.750             0.30769231
## 4             -0.49304754                  0.750             0.07692308
## 5             -0.30264716                  0.500             0.76923077
## 6              0.78302831                  0.750             0.30769231
## 7              0.82718551                  0.500             0.53846154
## 8             -0.62493452                  0.750             0.69230769
## 9             -0.15478240                  0.500             0.69230769
## 10             0.86797735                  0.500             0.53846154
## 11             1.03272468                  0.500             0.69230769
## 12             0.80116824                  0.500             0.46153846
## 13             0.29856855                  0.750             0.38461538
## 14            -0.19099786                  0.750             0.46153846
## 15             1.47768010                  0.625             0.46153846
## 16             1.45814250                  0.375             0.30769231
## 17            -0.64932697                  0.625             0.30769231
## 18             1.25320286                  0.500             0.46153846
## 19             1.09084457                  0.500             0.61538462
## 20            -0.29337146                  0.875             0.69230769
## 21             1.34933040                  0.375             0.53846154
## 22            -1.37016923                  0.625             0.38461538
## 23            -2.57583756                  0.625             0.46153846
## 24            -0.16864199                  0.500             0.53846154
## 25            -1.20792703                  0.375             0.38461538
## 26             0.88824265                  0.750             0.53846154
## 27             0.73407822                  0.375             0.53846154
## 28             0.29046737                  0.625             0.30769231
## 29            -0.79790593                  0.250             0.38461538
## 30             0.32468178                  0.500             0.38461538
## 31            -0.83223797                  0.500             0.38461538
## 32             0.88901510                  0.375             0.38461538
## 33            -0.85737161                  0.375             0.69230769
## 34             0.94392930                  0.375             0.38461538
## 35            -0.31203323                  0.625             0.23076923
## 36            -0.60291110                  0.500             0.53846154
## 37             1.17231968                  0.250             0.61538462
## 38             0.54865596                  0.500             0.69230769
## 39             0.17131603                  0.375             0.38461538
## 40            -0.14296858                  0.500             0.46153846
## 41             0.21824639                  0.375             0.30769231
## 42            -1.32501692                  0.375             0.46153846
## 43            -1.77784215                  0.375             0.38461538
## 44            -0.22834196                  0.375             0.30769231
## 45             0.57284391                  0.625             0.84615385
## 46             0.05314460                  0.250             0.53846154
## 47            -0.14938706                  0.500             0.53846154
## 48            -1.40757429                  0.625             0.61538462
## 49            -1.01580378                  0.375             0.76923077
## 50             0.48434084                  0.125             0.61538462
## 51             0.06396901                  0.125             0.38461538
## 52            -0.64541256                  0.625             0.30769231
## 53            -0.45404545                  0.500             0.38461538
## 54             0.11332975                  0.625             0.38461538
## 55            -0.78907028                  0.625             0.00000000
## 56             0.31088981                  0.875             0.69230769
## 57             0.07822771                  0.625             0.30769231
## 58            -0.58201490                  0.750             0.53846154
## 59             0.44116974                  0.750             0.53846154
## 60             0.24796572                  0.625             0.76923077
## 61            -0.05848439                  0.375             0.46153846
## 62             0.40872074                  0.875             0.38461538
## 63            -0.32032001                  0.500             0.23076923
## 64            -0.91494581                  0.375             0.38461538
## 65            -1.83155033                  0.625             0.15384615
## 66            -1.34424524                  0.875             0.46153846
## 67             0.35027736                  0.375             0.61538462
## 68             2.92230243                  0.500             0.69230769
## 69             0.86821340                  0.625             0.76923077
## 70             0.79287808                  0.375             0.46153846
## 71             0.66075083                  0.625             0.30769231
## 72            -0.02249544                  0.625             0.61538462
## 73            -0.20512147                  0.625             0.69230769
## 74             1.08404197                  0.125             0.46153846
## 75             0.02265817                  0.875             0.69230769
## 76            -0.15748694                  0.375             0.53846154
## 77            -1.65728270                  0.250             0.30769231
## 78            -0.91093557                  0.500             0.76923077
## 79             0.13103171                  0.250             0.46153846
## 80             0.23187866                  0.250             0.61538462
## 81            -0.88901946                  0.125             0.53846154
## 82             1.64246005                  0.625             0.23076923
## 83            -0.70483857                  0.125             0.30769231
## 84             0.90948576                  0.625             0.61538462
## 85            -1.17292154                  0.375             0.53846154
## 86            -0.91554935                  0.250             0.76923077
## 87            -0.14661798                  0.500             0.23076923
## 88            -0.12208323                  0.750             0.76923077
## 89             1.57457166                  0.625             0.46153846
## 90             0.05812763                  0.750             0.30769231
## 91            -2.00876709                  0.125             0.69230769
## 92             0.38593057                  0.250             0.38461538
## 93             1.23372775                  0.750             0.46153846
## 94            -1.57980687                  0.250             0.15384615
## 95            -1.29801232                  0.500             0.61538462
## 96             0.48613163                  0.750             0.30769231
## 97            -1.74924827                  0.750             0.53846154
## 98             0.23365132                  0.750             0.53846154
## 99            -0.51109968                  0.625             0.46153846
## 100           -1.50245125                  0.500             0.23076923
## 101            0.96748939                  0.500             0.84615385
## 102            1.44444011                  0.500             0.23076923
## 103            1.23881007                  0.500             0.92307692
## 104           -1.31574054                  0.375             0.38461538
## 105           -0.46338989                  0.625             0.38461538
## 106           -0.61438652                  0.500             0.84615385
## 107            0.32690150                  0.625             0.38461538
## 108           -1.95613596                  0.750             0.76923077
## 109           -0.15357978                  0.625             0.61538462
## 110           -2.02475344                  0.375             0.30769231
## 111           -0.09791726                  0.625             0.38461538
## 112            0.91012971                  0.125             0.38461538
## 113            0.27518639                  0.375             0.53846154
## 114            1.07236825                  0.375             1.00000000
## 115            0.17422720                  0.500             0.46153846
## 116            1.38360979                  0.750             0.53846154
## 117           -0.60907232                  0.625             0.46153846
## 118            2.23241566                  0.500             0.92307692
## 119            2.03790898                  1.000             0.76923077
## 120           -0.45638837                  0.125             0.30769231
##     Hojas.d.estandarizada
## 1             0.993265993
## 2             0.579124579
## 3             0.138047138
## 4             0.868686869
## 5             0.296296296
## 6             0.205387205
## 7             0.417508418
## 8             0.003367003
## 9             0.111111111
## 10            0.606060606
## 11            0.909090909
## 12            0.552188552
## 13            0.202020202
## 14            0.067340067
## 15            0.114478114
## 16            0.111111111
## 17            0.205387205
## 18            0.572390572
## 19            0.861952862
## 20            0.730639731
## 21            0.498316498
## 22            0.060606061
## 23            0.107744108
## 24            0.865319865
## 25            0.838383838
## 26            0.484848485
## 27            0.949494949
## 28            0.148148148
## 29            0.249158249
## 30            0.468013468
## 31            0.356902357
## 32            0.296296296
## 33            0.040404040
## 34            0.326599327
## 35            0.057239057
## 36            0.427609428
## 37            0.976430976
## 38            0.888888889
## 39            0.542087542
## 40            0.074074074
## 41            0.855218855
## 42            1.000000000
## 43            0.494949495
## 44            0.121212121
## 45            0.326599327
## 46            0.909090909
## 47            0.952861953
## 48            0.895622896
## 49            0.047138047
## 50            0.989898990
## 51            0.757575758
## 52            0.542087542
## 53            0.050505051
## 54            0.609427609
## 55            0.555555556
## 56            0.464646465
## 57            0.983164983
## 58            0.858585859
## 59            0.872053872
## 60            0.535353535
## 61            0.000000000
## 62            0.636363636
## 63            0.080808081
## 64            0.740740741
## 65            0.750841751
## 66            0.569023569
## 67            0.973063973
## 68            0.350168350
## 69            0.033670034
## 70            0.639730640
## 71            0.548821549
## 72            0.521885522
## 73            0.414141414
## 74            0.824915825
## 75            0.582491582
## 76            0.794612795
## 77            0.040404040
## 78            0.582491582
## 79            0.087542088
## 80            0.861952862
## 81            0.208754209
## 82            0.131313131
## 83            0.505050505
## 84            0.181818182
## 85            0.602693603
## 86            0.747474747
## 87            0.417508418
## 88            0.464646465
## 89            0.474747475
## 90            0.195286195
## 91            0.323232323
## 92            0.356902357
## 93            0.538720539
## 94            0.845117845
## 95            0.299663300
## 96            0.771043771
## 97            0.114478114
## 98            0.979797980
## 99            0.457912458
## 100           0.478114478
## 101           0.026936027
## 102           0.767676768
## 103           0.225589226
## 104           0.124579125
## 105           0.434343434
## 106           0.346801347
## 107           0.212121212
## 108           0.737373737
## 109           0.575757576
## 110           0.377104377
## 111           0.841750842
## 112           0.205387205
## 113           0.767676768
## 114           0.164983165
## 115           0.225589226
## 116           0.710437710
## 117           0.158249158
## 118           0.185185185
## 119           0.727272727
## 120           0.653198653

##Punto 17

library(dplyr)
flores.div = tib.e %>% mutate(flor.div = Flores.r/Flores.d)
flores.div
##      Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1   5.770627       14       10     297 presente      PA            FI
## 2   5.278693       12        9     174  ausente       S            FO
## 3   5.745108       18        8      43 presente      MA            FI
## 4   4.703498       18        5     260 presente      MA            FI
## 5   4.858429       16       14      90  ausente       S            FI
## 6   5.741851       18        8      63 presente      MA            FI
## 7   5.777783       16       11     126 presente       S            FO
## 8   4.596181       18       13       3 presente      PA            FI
## 9   4.978747       16       13      35 presente      MA            FI
## 10  5.810975       16       11     182 presente      PA            FI
## 11  5.945031       16       13     272 presente      PA            FI
## 12  5.756612       16       10     166  ausente       S            FI
## 13  5.347643       18        9      62 presente       S            FI
## 14  4.949278       18       10      22 presente       S            FI
## 15  6.307095       17       10      36 presente      MA            FI
## 16  6.291197       15        8      35 presente      MA            FO
## 17  4.576332       17        8      63  ausente      PA            FI
## 18  6.124436       16       10     172  ausente      MA            FI
## 19  5.992324       16       12     258 presente      PA            FO
## 20  4.865976       19       13     219 presente      MA            FI
## 21  6.202656       15       11     150 presente      MA            FO
## 22  3.989777       17        9      20 presente      MA            FO
## 23  3.008715       17       10      34 presente      PA            FI
## 24  4.967470       16       11     259 presente      MA            FI
## 25  4.121795       15        9     251 presente      PA            FI
## 26  5.827465       18       11     146  ausente      PA            FO
## 27  5.702020       15       11     284 presente      PA            FO
## 28  5.341051       17        8      46 presente      MA            FI
## 29  4.455432       14        9      76  ausente      MA            FI
## 30  5.368891       16        9     141 presente       S            FO
## 31  4.427496       16        9     108 presente      PA            FI
## 32  5.828094       15        9      90 presente       S            FI
## 33  4.407045       15       13      14 presente      MA            FO
## 34  5.872778       15        9      99 presente      PA            FI
## 35  4.850791       17        7      19 presente      MA            FO
## 36  4.614101       16       11     129 presente      PA            FI
## 37  6.058621       14       12     292  ausente       S            FO
## 38  5.551141       16       13     266  ausente      MA            FI
## 39  5.244096       15        9     163  ausente      MA            FI
## 40  4.988360       16       10      24  ausente       S            FI
## 41  5.282284       15        8     256  ausente       S            FI
## 42  4.026518       15       10     299 presente      PA            FO
## 43  3.658050       15        9     149  ausente       S            FO
## 44  4.918891       15        8      38 presente       S            FI
## 45  5.570823       17       15      99 presente      PA            FI
## 46  5.147939       14       11     272  ausente      MA            FO
## 47  4.983138       16       11     285 presente       S            FI
## 48  3.959340       17       12     268  ausente      PA            FI
## 49  4.278127       15       14      16  ausente       S            FO
## 50  5.498807       13       12     296 presente       S            FI
## 51  5.156747       13        9     227 presente      MA            FI
## 52  4.579518       17        8     163 presente      MA            FI
## 53  4.735235       16        9      17  ausente      MA            FI
## 54  5.196912       17        9     183  ausente      MA            FI
## 55  4.462622       17        4     167  ausente      MA            FI
## 56  5.357669       19       13     140 presente       S            FI
## 57  5.168350       17        8     294 presente       S            FI
## 58  4.631105       18       11     257 presente      PA            FI
## 59  5.463678       18       11     261 presente      PA            FI
## 60  5.306467       17       14     161 presente       S            FI
## 61  5.057106       15       10       2 presente       S            FI
## 62  5.437274       19        9     191  ausente      MA            FI
## 63  4.844048       16        7      26 presente      MA            FO
## 64  4.360196       15        9     222  ausente      PA            FI
## 65  3.614348       17        6     225 presente      MA            FI
## 66  4.010872       19       10     171  ausente      MA            FI
## 67  5.389719       15       12     291 presente       S            FI
## 68  7.482596       16       13     106 presente       S            FO
## 69  5.811167       17       14      12 presente      PA            FI
## 70  5.749866       15       10     192 presente      MA            FI
## 71  5.642353       17        8     165 presente      MA            FI
## 72  5.086390       17       12     157 presente      PA            FI
## 73  4.937786       17       13     125 presente      PA            FI
## 74  5.986789       13       10     247  ausente      MA            FI
## 75  5.123132       19       13     175 presente      PA            FI
## 76  4.976547       15       11     238 presente       S            FI
## 77  3.756151       14        8      14  ausente      PA            FO
## 78  4.363459       16       14     175 presente      PA            FI
## 79  5.211317       14       10      28 presente      PA            FI
## 80  5.293377       14       12     258  ausente       S            FO
## 81  4.381293       13       11      64 presente       S            FO
## 82  6.441178       17        7      41 presente       S            FO
## 83  4.531162       13        8     152 presente       S            FI
## 84  5.844751       17       12      56 presente      PA            FI
## 85  4.150279       15       11     181 presente      PA            FO
## 86  4.359705       14       14     224 presente      PA            FI
## 87  4.985391       16        7     126 presente      MA            FI
## 88  5.005355       18       14     140 presente       S            FO
## 89  6.385937       17       10     143 presente       S            FO
## 90  5.151994       18        8      60 presente      MA            FO
## 91  3.470145       13       13      98 presente      MA            FI
## 92  5.418730       14        9     108 presente       S            FI
## 93  6.108589       18       10     162 presente       S            FO
## 94  3.819193       14        6     253 presente      PA            FI
## 95  4.048492       16       12      91 presente      PA            FO
## 96  5.500264       18        8     231 presente      MA            FO
## 97  3.681318       18       11      36 presente       S            FI
## 98  5.294819       18       11     293 presente       S            FI
## 99  4.688809       17       10     138 presente      PA            FO
## 100 3.882138       16        7     144 presente       S            FO
## 101 5.891949       16       15      10  ausente      MA            FO
## 102 6.280048       16        7     230 presente       S            FI
## 103 6.112725       16       16      69  ausente       S            FI
## 104 4.034066       15        9      39 presente      MA            FI
## 105 4.727631       17        9     131 presente      PA            FI
## 106 4.604764       16       15     105 presente       S            FO
## 107 5.370697       17        9      65 presente      PA            FO
## 108 3.512971       18       14     221 presente      MA            FO
## 109 4.979726       17       12     173 presente       S            FI
## 110 3.457137       15        8     114 presente      PA            FI
## 111 5.025019       17        9     252  ausente      PA            FO
## 112 5.845275       13        9      63 presente      PA            FO
## 113 5.328616       15       11     230  ausente      MA            FO
## 114 5.977290       15       17      51 presente      MA            FI
## 115 5.246465       16       10      69 presente      MA            FI
## 116 6.230549       18       11     213 presente       S            FI
## 117 4.609088       17       10      49 presente       S            FO
## 118 6.921230       16       16      57 presente      PA            FO
## 119 6.762958       20       14     218 presente      PA            FO
## 120 4.733328       13        8     196  ausente      PA            FI
##     Biomasa.estandarizada Flores.r.estandarizada Flores.d.estandarizada
## 1              0.81839125                  0.250             0.46153846
## 2              0.21383358                  0.000             0.38461538
## 3              0.78703085                  0.750             0.30769231
## 4             -0.49304754                  0.750             0.07692308
## 5             -0.30264716                  0.500             0.76923077
## 6              0.78302831                  0.750             0.30769231
## 7              0.82718551                  0.500             0.53846154
## 8             -0.62493452                  0.750             0.69230769
## 9             -0.15478240                  0.500             0.69230769
## 10             0.86797735                  0.500             0.53846154
## 11             1.03272468                  0.500             0.69230769
## 12             0.80116824                  0.500             0.46153846
## 13             0.29856855                  0.750             0.38461538
## 14            -0.19099786                  0.750             0.46153846
## 15             1.47768010                  0.625             0.46153846
## 16             1.45814250                  0.375             0.30769231
## 17            -0.64932697                  0.625             0.30769231
## 18             1.25320286                  0.500             0.46153846
## 19             1.09084457                  0.500             0.61538462
## 20            -0.29337146                  0.875             0.69230769
## 21             1.34933040                  0.375             0.53846154
## 22            -1.37016923                  0.625             0.38461538
## 23            -2.57583756                  0.625             0.46153846
## 24            -0.16864199                  0.500             0.53846154
## 25            -1.20792703                  0.375             0.38461538
## 26             0.88824265                  0.750             0.53846154
## 27             0.73407822                  0.375             0.53846154
## 28             0.29046737                  0.625             0.30769231
## 29            -0.79790593                  0.250             0.38461538
## 30             0.32468178                  0.500             0.38461538
## 31            -0.83223797                  0.500             0.38461538
## 32             0.88901510                  0.375             0.38461538
## 33            -0.85737161                  0.375             0.69230769
## 34             0.94392930                  0.375             0.38461538
## 35            -0.31203323                  0.625             0.23076923
## 36            -0.60291110                  0.500             0.53846154
## 37             1.17231968                  0.250             0.61538462
## 38             0.54865596                  0.500             0.69230769
## 39             0.17131603                  0.375             0.38461538
## 40            -0.14296858                  0.500             0.46153846
## 41             0.21824639                  0.375             0.30769231
## 42            -1.32501692                  0.375             0.46153846
## 43            -1.77784215                  0.375             0.38461538
## 44            -0.22834196                  0.375             0.30769231
## 45             0.57284391                  0.625             0.84615385
## 46             0.05314460                  0.250             0.53846154
## 47            -0.14938706                  0.500             0.53846154
## 48            -1.40757429                  0.625             0.61538462
## 49            -1.01580378                  0.375             0.76923077
## 50             0.48434084                  0.125             0.61538462
## 51             0.06396901                  0.125             0.38461538
## 52            -0.64541256                  0.625             0.30769231
## 53            -0.45404545                  0.500             0.38461538
## 54             0.11332975                  0.625             0.38461538
## 55            -0.78907028                  0.625             0.00000000
## 56             0.31088981                  0.875             0.69230769
## 57             0.07822771                  0.625             0.30769231
## 58            -0.58201490                  0.750             0.53846154
## 59             0.44116974                  0.750             0.53846154
## 60             0.24796572                  0.625             0.76923077
## 61            -0.05848439                  0.375             0.46153846
## 62             0.40872074                  0.875             0.38461538
## 63            -0.32032001                  0.500             0.23076923
## 64            -0.91494581                  0.375             0.38461538
## 65            -1.83155033                  0.625             0.15384615
## 66            -1.34424524                  0.875             0.46153846
## 67             0.35027736                  0.375             0.61538462
## 68             2.92230243                  0.500             0.69230769
## 69             0.86821340                  0.625             0.76923077
## 70             0.79287808                  0.375             0.46153846
## 71             0.66075083                  0.625             0.30769231
## 72            -0.02249544                  0.625             0.61538462
## 73            -0.20512147                  0.625             0.69230769
## 74             1.08404197                  0.125             0.46153846
## 75             0.02265817                  0.875             0.69230769
## 76            -0.15748694                  0.375             0.53846154
## 77            -1.65728270                  0.250             0.30769231
## 78            -0.91093557                  0.500             0.76923077
## 79             0.13103171                  0.250             0.46153846
## 80             0.23187866                  0.250             0.61538462
## 81            -0.88901946                  0.125             0.53846154
## 82             1.64246005                  0.625             0.23076923
## 83            -0.70483857                  0.125             0.30769231
## 84             0.90948576                  0.625             0.61538462
## 85            -1.17292154                  0.375             0.53846154
## 86            -0.91554935                  0.250             0.76923077
## 87            -0.14661798                  0.500             0.23076923
## 88            -0.12208323                  0.750             0.76923077
## 89             1.57457166                  0.625             0.46153846
## 90             0.05812763                  0.750             0.30769231
## 91            -2.00876709                  0.125             0.69230769
## 92             0.38593057                  0.250             0.38461538
## 93             1.23372775                  0.750             0.46153846
## 94            -1.57980687                  0.250             0.15384615
## 95            -1.29801232                  0.500             0.61538462
## 96             0.48613163                  0.750             0.30769231
## 97            -1.74924827                  0.750             0.53846154
## 98             0.23365132                  0.750             0.53846154
## 99            -0.51109968                  0.625             0.46153846
## 100           -1.50245125                  0.500             0.23076923
## 101            0.96748939                  0.500             0.84615385
## 102            1.44444011                  0.500             0.23076923
## 103            1.23881007                  0.500             0.92307692
## 104           -1.31574054                  0.375             0.38461538
## 105           -0.46338989                  0.625             0.38461538
## 106           -0.61438652                  0.500             0.84615385
## 107            0.32690150                  0.625             0.38461538
## 108           -1.95613596                  0.750             0.76923077
## 109           -0.15357978                  0.625             0.61538462
## 110           -2.02475344                  0.375             0.30769231
## 111           -0.09791726                  0.625             0.38461538
## 112            0.91012971                  0.125             0.38461538
## 113            0.27518639                  0.375             0.53846154
## 114            1.07236825                  0.375             1.00000000
## 115            0.17422720                  0.500             0.46153846
## 116            1.38360979                  0.750             0.53846154
## 117           -0.60907232                  0.625             0.46153846
## 118            2.23241566                  0.500             0.92307692
## 119            2.03790898                  1.000             0.76923077
## 120           -0.45638837                  0.125             0.30769231
##     Hojas.d.estandarizada  flor.div
## 1             0.993265993 1.4000000
## 2             0.579124579 1.3333333
## 3             0.138047138 2.2500000
## 4             0.868686869 3.6000000
## 5             0.296296296 1.1428571
## 6             0.205387205 2.2500000
## 7             0.417508418 1.4545455
## 8             0.003367003 1.3846154
## 9             0.111111111 1.2307692
## 10            0.606060606 1.4545455
## 11            0.909090909 1.2307692
## 12            0.552188552 1.6000000
## 13            0.202020202 2.0000000
## 14            0.067340067 1.8000000
## 15            0.114478114 1.7000000
## 16            0.111111111 1.8750000
## 17            0.205387205 2.1250000
## 18            0.572390572 1.6000000
## 19            0.861952862 1.3333333
## 20            0.730639731 1.4615385
## 21            0.498316498 1.3636364
## 22            0.060606061 1.8888889
## 23            0.107744108 1.7000000
## 24            0.865319865 1.4545455
## 25            0.838383838 1.6666667
## 26            0.484848485 1.6363636
## 27            0.949494949 1.3636364
## 28            0.148148148 2.1250000
## 29            0.249158249 1.5555556
## 30            0.468013468 1.7777778
## 31            0.356902357 1.7777778
## 32            0.296296296 1.6666667
## 33            0.040404040 1.1538462
## 34            0.326599327 1.6666667
## 35            0.057239057 2.4285714
## 36            0.427609428 1.4545455
## 37            0.976430976 1.1666667
## 38            0.888888889 1.2307692
## 39            0.542087542 1.6666667
## 40            0.074074074 1.6000000
## 41            0.855218855 1.8750000
## 42            1.000000000 1.5000000
## 43            0.494949495 1.6666667
## 44            0.121212121 1.8750000
## 45            0.326599327 1.1333333
## 46            0.909090909 1.2727273
## 47            0.952861953 1.4545455
## 48            0.895622896 1.4166667
## 49            0.047138047 1.0714286
## 50            0.989898990 1.0833333
## 51            0.757575758 1.4444444
## 52            0.542087542 2.1250000
## 53            0.050505051 1.7777778
## 54            0.609427609 1.8888889
## 55            0.555555556 4.2500000
## 56            0.464646465 1.4615385
## 57            0.983164983 2.1250000
## 58            0.858585859 1.6363636
## 59            0.872053872 1.6363636
## 60            0.535353535 1.2142857
## 61            0.000000000 1.5000000
## 62            0.636363636 2.1111111
## 63            0.080808081 2.2857143
## 64            0.740740741 1.6666667
## 65            0.750841751 2.8333333
## 66            0.569023569 1.9000000
## 67            0.973063973 1.2500000
## 68            0.350168350 1.2307692
## 69            0.033670034 1.2142857
## 70            0.639730640 1.5000000
## 71            0.548821549 2.1250000
## 72            0.521885522 1.4166667
## 73            0.414141414 1.3076923
## 74            0.824915825 1.3000000
## 75            0.582491582 1.4615385
## 76            0.794612795 1.3636364
## 77            0.040404040 1.7500000
## 78            0.582491582 1.1428571
## 79            0.087542088 1.4000000
## 80            0.861952862 1.1666667
## 81            0.208754209 1.1818182
## 82            0.131313131 2.4285714
## 83            0.505050505 1.6250000
## 84            0.181818182 1.4166667
## 85            0.602693603 1.3636364
## 86            0.747474747 1.0000000
## 87            0.417508418 2.2857143
## 88            0.464646465 1.2857143
## 89            0.474747475 1.7000000
## 90            0.195286195 2.2500000
## 91            0.323232323 1.0000000
## 92            0.356902357 1.5555556
## 93            0.538720539 1.8000000
## 94            0.845117845 2.3333333
## 95            0.299663300 1.3333333
## 96            0.771043771 2.2500000
## 97            0.114478114 1.6363636
## 98            0.979797980 1.6363636
## 99            0.457912458 1.7000000
## 100           0.478114478 2.2857143
## 101           0.026936027 1.0666667
## 102           0.767676768 2.2857143
## 103           0.225589226 1.0000000
## 104           0.124579125 1.6666667
## 105           0.434343434 1.8888889
## 106           0.346801347 1.0666667
## 107           0.212121212 1.8888889
## 108           0.737373737 1.2857143
## 109           0.575757576 1.4166667
## 110           0.377104377 1.8750000
## 111           0.841750842 1.8888889
## 112           0.205387205 1.4444444
## 113           0.767676768 1.3636364
## 114           0.164983165 0.8823529
## 115           0.225589226 1.6000000
## 116           0.710437710 1.6363636
## 117           0.158249158 1.7000000
## 118           0.185185185 1.0000000
## 119           0.727272727 1.4285714
## 120           0.653198653 1.6250000

##Punto 18

flores.div %>% select(flor.div, Plaga) %>% 
  mutate(rangomin = min_rank(flor.div)) %>% 
  arrange(desc(rangomin))
##      flor.div    Plaga rangomin
## 1   4.2500000  ausente      120
## 2   3.6000000 presente      119
## 3   2.8333333 presente      118
## 4   2.4285714 presente      116
## 5   2.4285714 presente      116
## 6   2.3333333 presente      115
## 7   2.2857143 presente      111
## 8   2.2857143 presente      111
## 9   2.2857143 presente      111
## 10  2.2857143 presente      111
## 11  2.2500000 presente      107
## 12  2.2500000 presente      107
## 13  2.2500000 presente      107
## 14  2.2500000 presente      107
## 15  2.1250000  ausente      102
## 16  2.1250000 presente      102
## 17  2.1250000 presente      102
## 18  2.1250000 presente      102
## 19  2.1250000 presente      102
## 20  2.1111111  ausente      101
## 21  2.0000000 presente      100
## 22  1.9000000  ausente       99
## 23  1.8888889 presente       94
## 24  1.8888889  ausente       94
## 25  1.8888889 presente       94
## 26  1.8888889 presente       94
## 27  1.8888889  ausente       94
## 28  1.8750000 presente       90
## 29  1.8750000  ausente       90
## 30  1.8750000 presente       90
## 31  1.8750000 presente       90
## 32  1.8000000 presente       88
## 33  1.8000000 presente       88
## 34  1.7777778 presente       85
## 35  1.7777778 presente       85
## 36  1.7777778  ausente       85
## 37  1.7500000  ausente       84
## 38  1.7000000 presente       79
## 39  1.7000000 presente       79
## 40  1.7000000 presente       79
## 41  1.7000000 presente       79
## 42  1.7000000 presente       79
## 43  1.6666667 presente       72
## 44  1.6666667 presente       72
## 45  1.6666667 presente       72
## 46  1.6666667  ausente       72
## 47  1.6666667  ausente       72
## 48  1.6666667  ausente       72
## 49  1.6666667 presente       72
## 50  1.6363636  ausente       66
## 51  1.6363636 presente       66
## 52  1.6363636 presente       66
## 53  1.6363636 presente       66
## 54  1.6363636 presente       66
## 55  1.6363636 presente       66
## 56  1.6250000 presente       64
## 57  1.6250000  ausente       64
## 58  1.6000000  ausente       60
## 59  1.6000000  ausente       60
## 60  1.6000000  ausente       60
## 61  1.6000000 presente       60
## 62  1.5555556  ausente       58
## 63  1.5555556 presente       58
## 64  1.5000000 presente       55
## 65  1.5000000 presente       55
## 66  1.5000000 presente       55
## 67  1.4615385 presente       52
## 68  1.4615385 presente       52
## 69  1.4615385 presente       52
## 70  1.4545455 presente       47
## 71  1.4545455 presente       47
## 72  1.4545455 presente       47
## 73  1.4545455 presente       47
## 74  1.4545455 presente       47
## 75  1.4444444 presente       45
## 76  1.4444444 presente       45
## 77  1.4285714 presente       44
## 78  1.4166667  ausente       40
## 79  1.4166667 presente       40
## 80  1.4166667 presente       40
## 81  1.4166667 presente       40
## 82  1.4000000 presente       38
## 83  1.4000000 presente       38
## 84  1.3846154 presente       37
## 85  1.3636364 presente       32
## 86  1.3636364 presente       32
## 87  1.3636364 presente       32
## 88  1.3636364 presente       32
## 89  1.3636364  ausente       32
## 90  1.3333333  ausente       29
## 91  1.3333333 presente       29
## 92  1.3333333 presente       29
## 93  1.3076923 presente       28
## 94  1.3000000  ausente       27
## 95  1.2857143 presente       25
## 96  1.2857143 presente       25
## 97  1.2727273  ausente       24
## 98  1.2500000 presente       23
## 99  1.2307692 presente       19
## 100 1.2307692 presente       19
## 101 1.2307692  ausente       19
## 102 1.2307692 presente       19
## 103 1.2142857 presente       17
## 104 1.2142857 presente       17
## 105 1.1818182 presente       16
## 106 1.1666667  ausente       14
## 107 1.1666667  ausente       14
## 108 1.1538462 presente       13
## 109 1.1428571  ausente       11
## 110 1.1428571 presente       11
## 111 1.1333333 presente       10
## 112 1.0833333 presente        9
## 113 1.0714286  ausente        8
## 114 1.0666667  ausente        6
## 115 1.0666667 presente        6
## 116 1.0000000 presente        2
## 117 1.0000000 presente        2
## 118 1.0000000  ausente        2
## 119 1.0000000 presente        2
## 120 0.8823529 presente        1

##Punto 19

tib.c %>% rename ( B.m = Biomasa, 
                  F.d = Flores.d, 
                  F.r = Flores.r, 
                  H.d = Hojas.d )
##          B.m F.r F.d H.d    Plaga Estatus Fertilizacion
## 1   5.770627  14  10 297 presente      PA            FI
## 2   5.278693  12   9 174  ausente       S            FO
## 3   5.745108  18   8  43 presente      MA            FI
## 4   4.703498  18   5 260 presente      MA            FI
## 5   4.858429  16  14  90  ausente       S            FI
## 6   5.741851  18   8  63 presente      MA            FI
## 7   5.777783  16  11 126 presente       S            FO
## 8   4.596181  18  13   3 presente      PA            FI
## 9   4.978747  16  13  35 presente      MA            FI
## 10  5.810975  16  11 182 presente      PA            FI
## 11  5.945031  16  13 272 presente      PA            FI
## 12  5.756612  16  10 166  ausente       S            FI
## 13  5.347643  18   9  62 presente       S            FI
## 14  4.949278  18  10  22 presente       S            FI
## 15  6.307095  17  10  36 presente      MA            FI
## 16  6.291197  15   8  35 presente      MA            FO
## 17  4.576332  17   8  63  ausente      PA            FI
## 18  6.124436  16  10 172  ausente      MA            FI
## 19  5.992324  16  12 258 presente      PA            FO
## 20  4.865976  19  13 219 presente      MA            FI
## 21  6.202656  15  11 150 presente      MA            FO
## 22  3.989777  17   9  20 presente      MA            FO
## 23  3.008715  17  10  34 presente      PA            FI
## 24  4.967470  16  11 259 presente      MA            FI
## 25  4.121795  15   9 251 presente      PA            FI
## 26  5.827465  18  11 146  ausente      PA            FO
## 27  5.702020  15  11 284 presente      PA            FO
## 28  5.341051  17   8  46 presente      MA            FI
## 29  4.455432  14   9  76  ausente      MA            FI
## 30  5.368891  16   9 141 presente       S            FO
## 31  4.427496  16   9 108 presente      PA            FI
## 32  5.828094  15   9  90 presente       S            FI
## 33  4.407045  15  13  14 presente      MA            FO
## 34  5.872778  15   9  99 presente      PA            FI
## 35  4.850791  17   7  19 presente      MA            FO
## 36  4.614101  16  11 129 presente      PA            FI
## 37  6.058621  14  12 292  ausente       S            FO
## 38  5.551141  16  13 266  ausente      MA            FI
## 39  5.244096  15   9 163  ausente      MA            FI
## 40  4.988360  16  10  24  ausente       S            FI
## 41  5.282284  15   8 256  ausente       S            FI
## 42  4.026518  15  10 299 presente      PA            FO
## 43  3.658050  15   9 149  ausente       S            FO
## 44  4.918891  15   8  38 presente       S            FI
## 45  5.570823  17  15  99 presente      PA            FI
## 46  5.147939  14  11 272  ausente      MA            FO
## 47  4.983138  16  11 285 presente       S            FI
## 48  3.959340  17  12 268  ausente      PA            FI
## 49  4.278127  15  14  16  ausente       S            FO
## 50  5.498807  13  12 296 presente       S            FI
## 51  5.156747  13   9 227 presente      MA            FI
## 52  4.579518  17   8 163 presente      MA            FI
## 53  4.735235  16   9  17  ausente      MA            FI
## 54  5.196912  17   9 183  ausente      MA            FI
## 55  4.462622  17   4 167  ausente      MA            FI
## 56  5.357669  19  13 140 presente       S            FI
## 57  5.168350  17   8 294 presente       S            FI
## 58  4.631105  18  11 257 presente      PA            FI
## 59  5.463678  18  11 261 presente      PA            FI
## 60  5.306467  17  14 161 presente       S            FI
## 61  5.057106  15  10   2 presente       S            FI
## 62  5.437274  19   9 191  ausente      MA            FI
## 63  4.844048  16   7  26 presente      MA            FO
## 64  4.360196  15   9 222  ausente      PA            FI
## 65  3.614348  17   6 225 presente      MA            FI
## 66  4.010872  19  10 171  ausente      MA            FI
## 67  5.389719  15  12 291 presente       S            FI
## 68  7.482596  16  13 106 presente       S            FO
## 69  5.811167  17  14  12 presente      PA            FI
## 70  5.749866  15  10 192 presente      MA            FI
## 71  5.642353  17   8 165 presente      MA            FI
## 72  5.086390  17  12 157 presente      PA            FI
## 73  4.937786  17  13 125 presente      PA            FI
## 74  5.986789  13  10 247  ausente      MA            FI
## 75  5.123132  19  13 175 presente      PA            FI
## 76  4.976547  15  11 238 presente       S            FI
## 77  3.756151  14   8  14  ausente      PA            FO
## 78  4.363459  16  14 175 presente      PA            FI
## 79  5.211317  14  10  28 presente      PA            FI
## 80  5.293377  14  12 258  ausente       S            FO
## 81  4.381293  13  11  64 presente       S            FO
## 82  6.441178  17   7  41 presente       S            FO
## 83  4.531162  13   8 152 presente       S            FI
## 84  5.844751  17  12  56 presente      PA            FI
## 85  4.150279  15  11 181 presente      PA            FO
## 86  4.359705  14  14 224 presente      PA            FI
## 87  4.985391  16   7 126 presente      MA            FI
## 88  5.005355  18  14 140 presente       S            FO
## 89  6.385937  17  10 143 presente       S            FO
## 90  5.151994  18   8  60 presente      MA            FO
## 91  3.470145  13  13  98 presente      MA            FI
## 92  5.418730  14   9 108 presente       S            FI
## 93  6.108589  18  10 162 presente       S            FO
## 94  3.819193  14   6 253 presente      PA            FI
## 95  4.048492  16  12  91 presente      PA            FO
## 96  5.500264  18   8 231 presente      MA            FO
## 97  3.681318  18  11  36 presente       S            FI
## 98  5.294819  18  11 293 presente       S            FI
## 99  4.688809  17  10 138 presente      PA            FO
## 100 3.882138  16   7 144 presente       S            FO
## 101 5.891949  16  15  10  ausente      MA            FO
## 102 6.280048  16   7 230 presente       S            FI
## 103 6.112725  16  16  69  ausente       S            FI
## 104 4.034066  15   9  39 presente      MA            FI
## 105 4.727631  17   9 131 presente      PA            FI
## 106 4.604764  16  15 105 presente       S            FO
## 107 5.370697  17   9  65 presente      PA            FO
## 108 3.512971  18  14 221 presente      MA            FO
## 109 4.979726  17  12 173 presente       S            FI
## 110 3.457137  15   8 114 presente      PA            FI
## 111 5.025019  17   9 252  ausente      PA            FO
## 112 5.845275  13   9  63 presente      PA            FO
## 113 5.328616  15  11 230  ausente      MA            FO
## 114 5.977290  15  17  51 presente      MA            FI
## 115 5.246465  16  10  69 presente      MA            FI
## 116 6.230549  18  11 213 presente       S            FI
## 117 4.609088  17  10  49 presente       S            FO
## 118 6.921230  16  16  57 presente      PA            FO
## 119 6.762958  20  14 218 presente      PA            FO
## 120 4.733328  13   8 196  ausente      PA            FI

##Punto 20

tib.c %>% select_all(toupper)
##      BIOMASA FLORES.R FLORES.D HOJAS.D    PLAGA ESTATUS FERTILIZACION
## 1   5.770627       14       10     297 presente      PA            FI
## 2   5.278693       12        9     174  ausente       S            FO
## 3   5.745108       18        8      43 presente      MA            FI
## 4   4.703498       18        5     260 presente      MA            FI
## 5   4.858429       16       14      90  ausente       S            FI
## 6   5.741851       18        8      63 presente      MA            FI
## 7   5.777783       16       11     126 presente       S            FO
## 8   4.596181       18       13       3 presente      PA            FI
## 9   4.978747       16       13      35 presente      MA            FI
## 10  5.810975       16       11     182 presente      PA            FI
## 11  5.945031       16       13     272 presente      PA            FI
## 12  5.756612       16       10     166  ausente       S            FI
## 13  5.347643       18        9      62 presente       S            FI
## 14  4.949278       18       10      22 presente       S            FI
## 15  6.307095       17       10      36 presente      MA            FI
## 16  6.291197       15        8      35 presente      MA            FO
## 17  4.576332       17        8      63  ausente      PA            FI
## 18  6.124436       16       10     172  ausente      MA            FI
## 19  5.992324       16       12     258 presente      PA            FO
## 20  4.865976       19       13     219 presente      MA            FI
## 21  6.202656       15       11     150 presente      MA            FO
## 22  3.989777       17        9      20 presente      MA            FO
## 23  3.008715       17       10      34 presente      PA            FI
## 24  4.967470       16       11     259 presente      MA            FI
## 25  4.121795       15        9     251 presente      PA            FI
## 26  5.827465       18       11     146  ausente      PA            FO
## 27  5.702020       15       11     284 presente      PA            FO
## 28  5.341051       17        8      46 presente      MA            FI
## 29  4.455432       14        9      76  ausente      MA            FI
## 30  5.368891       16        9     141 presente       S            FO
## 31  4.427496       16        9     108 presente      PA            FI
## 32  5.828094       15        9      90 presente       S            FI
## 33  4.407045       15       13      14 presente      MA            FO
## 34  5.872778       15        9      99 presente      PA            FI
## 35  4.850791       17        7      19 presente      MA            FO
## 36  4.614101       16       11     129 presente      PA            FI
## 37  6.058621       14       12     292  ausente       S            FO
## 38  5.551141       16       13     266  ausente      MA            FI
## 39  5.244096       15        9     163  ausente      MA            FI
## 40  4.988360       16       10      24  ausente       S            FI
## 41  5.282284       15        8     256  ausente       S            FI
## 42  4.026518       15       10     299 presente      PA            FO
## 43  3.658050       15        9     149  ausente       S            FO
## 44  4.918891       15        8      38 presente       S            FI
## 45  5.570823       17       15      99 presente      PA            FI
## 46  5.147939       14       11     272  ausente      MA            FO
## 47  4.983138       16       11     285 presente       S            FI
## 48  3.959340       17       12     268  ausente      PA            FI
## 49  4.278127       15       14      16  ausente       S            FO
## 50  5.498807       13       12     296 presente       S            FI
## 51  5.156747       13        9     227 presente      MA            FI
## 52  4.579518       17        8     163 presente      MA            FI
## 53  4.735235       16        9      17  ausente      MA            FI
## 54  5.196912       17        9     183  ausente      MA            FI
## 55  4.462622       17        4     167  ausente      MA            FI
## 56  5.357669       19       13     140 presente       S            FI
## 57  5.168350       17        8     294 presente       S            FI
## 58  4.631105       18       11     257 presente      PA            FI
## 59  5.463678       18       11     261 presente      PA            FI
## 60  5.306467       17       14     161 presente       S            FI
## 61  5.057106       15       10       2 presente       S            FI
## 62  5.437274       19        9     191  ausente      MA            FI
## 63  4.844048       16        7      26 presente      MA            FO
## 64  4.360196       15        9     222  ausente      PA            FI
## 65  3.614348       17        6     225 presente      MA            FI
## 66  4.010872       19       10     171  ausente      MA            FI
## 67  5.389719       15       12     291 presente       S            FI
## 68  7.482596       16       13     106 presente       S            FO
## 69  5.811167       17       14      12 presente      PA            FI
## 70  5.749866       15       10     192 presente      MA            FI
## 71  5.642353       17        8     165 presente      MA            FI
## 72  5.086390       17       12     157 presente      PA            FI
## 73  4.937786       17       13     125 presente      PA            FI
## 74  5.986789       13       10     247  ausente      MA            FI
## 75  5.123132       19       13     175 presente      PA            FI
## 76  4.976547       15       11     238 presente       S            FI
## 77  3.756151       14        8      14  ausente      PA            FO
## 78  4.363459       16       14     175 presente      PA            FI
## 79  5.211317       14       10      28 presente      PA            FI
## 80  5.293377       14       12     258  ausente       S            FO
## 81  4.381293       13       11      64 presente       S            FO
## 82  6.441178       17        7      41 presente       S            FO
## 83  4.531162       13        8     152 presente       S            FI
## 84  5.844751       17       12      56 presente      PA            FI
## 85  4.150279       15       11     181 presente      PA            FO
## 86  4.359705       14       14     224 presente      PA            FI
## 87  4.985391       16        7     126 presente      MA            FI
## 88  5.005355       18       14     140 presente       S            FO
## 89  6.385937       17       10     143 presente       S            FO
## 90  5.151994       18        8      60 presente      MA            FO
## 91  3.470145       13       13      98 presente      MA            FI
## 92  5.418730       14        9     108 presente       S            FI
## 93  6.108589       18       10     162 presente       S            FO
## 94  3.819193       14        6     253 presente      PA            FI
## 95  4.048492       16       12      91 presente      PA            FO
## 96  5.500264       18        8     231 presente      MA            FO
## 97  3.681318       18       11      36 presente       S            FI
## 98  5.294819       18       11     293 presente       S            FI
## 99  4.688809       17       10     138 presente      PA            FO
## 100 3.882138       16        7     144 presente       S            FO
## 101 5.891949       16       15      10  ausente      MA            FO
## 102 6.280048       16        7     230 presente       S            FI
## 103 6.112725       16       16      69  ausente       S            FI
## 104 4.034066       15        9      39 presente      MA            FI
## 105 4.727631       17        9     131 presente      PA            FI
## 106 4.604764       16       15     105 presente       S            FO
## 107 5.370697       17        9      65 presente      PA            FO
## 108 3.512971       18       14     221 presente      MA            FO
## 109 4.979726       17       12     173 presente       S            FI
## 110 3.457137       15        8     114 presente      PA            FI
## 111 5.025019       17        9     252  ausente      PA            FO
## 112 5.845275       13        9      63 presente      PA            FO
## 113 5.328616       15       11     230  ausente      MA            FO
## 114 5.977290       15       17      51 presente      MA            FI
## 115 5.246465       16       10      69 presente      MA            FI
## 116 6.230549       18       11     213 presente       S            FI
## 117 4.609088       17       10      49 presente       S            FO
## 118 6.921230       16       16      57 presente      PA            FO
## 119 6.762958       20       14     218 presente      PA            FO
## 120 4.733328       13        8     196  ausente      PA            FI

##Punto 21

tic.i %>% select(Biomasa) %>%  summarise(media = mean(Biomasa), numero_datos = n())
##      media numero_datos
## 1 5.128223           90

##Punto 22

tic.i %>% group_by(Fertilizacion) %>%
  summarise (media = mean(Biomasa, na.rm = TRUE), 
             n_datos =n())
## # A tibble: 2 x 3
##   Fertilizacion media n_datos
##   <chr>         <dbl>   <int>
## 1 FI             5.10      59
## 2 FO             5.18      31

##Punto 23

tic.i%>% group_by(Biomasa, Fertilizacion) %>% 
  summarise(quantile(tic.i$Biomasa, 
                     c(0.10,0.20, 0.30, 0.40, 0.50), 
                     na.rm = TRUE))
## `summarise()` has grouped output by 'Biomasa', 'Fertilizacion'. You can
## override using the `.groups` argument.
## # A tibble: 450 x 3
## # Groups:   Biomasa, Fertilizacion [90]
##    Biomasa Fertilizacion `quantile(tic.i$Biomasa, c(0.1, 0.2, 0.3, 0.4, 0.5), ~`
##      <dbl> <chr>                                                           <dbl>
##  1    3.01 FI                                                               4.02
##  2    3.01 FI                                                               4.42
##  3    3.01 FI                                                               4.73
##  4    3.01 FI                                                               4.98
##  5    3.01 FI                                                               5.18
##  6    3.46 FI                                                               4.02
##  7    3.46 FI                                                               4.42
##  8    3.46 FI                                                               4.73
##  9    3.46 FI                                                               4.98
## 10    3.46 FI                                                               5.18
## # ... with 440 more rows

##Punto 24

tic.i %>% group_by(Fertilizacion, Plaga) %>% 
  summarise(largo = length(Biomasa),
            media = mean(Biomasa), 
            mediana = median(Biomasa), 
            maximo = max(Biomasa), 
            minimo = min(Biomasa), 
            desv =sd(Biomasa),
            varianza = var(Biomasa),
            media_trunc = mean(Biomasa, trim = 0.1))
## `summarise()` has grouped output by 'Fertilizacion'. You can override using the
## `.groups` argument.
## # A tibble: 4 x 10
## # Groups:   Fertilizacion [2]
##   Fertilizacion Plaga    largo media mediana maximo minimo  desv varianza
##   <chr>         <chr>    <int> <dbl>   <dbl>  <dbl>  <dbl> <dbl>    <dbl>
## 1 FI            ausente     15  5.06    4.99   6.12   3.96 0.678    0.459
## 2 FI            presente    44  5.11    5.18   6.31   3.01 0.757    0.573
## 3 FO            ausente      9  5.18    5.29   6.06   3.66 0.782    0.612
## 4 FO            presente    22  5.18    4.93   7.48   3.51 1.08     1.16 
## # ... with 1 more variable: media_trunc <dbl>

##Punto 25

tib.c %>% group_by(Fertilizacion, Estatus) %>% 
  summarise(largo = length(Biomasa),
            media = mean(Biomasa), 
            mediana = median(Biomasa), 
            maximo = max(Biomasa), 
            minimo = min(Biomasa), 
            desv =sd(Biomasa),
            varianza = var(Biomasa),
            ferti = Fertilizacion,
            plaga = Plaga,
            media_truncada = mean(Biomasa, trim = 0.1)) %>% 
  filter(Estatus == 'S')
## `summarise()` has grouped output by 'Fertilizacion', 'Estatus'. You can
## override using the `.groups` argument.
## # A tibble: 40 x 12
## # Groups:   Fertilizacion, Estatus [2]
##    Fertilizacion Estatus largo media mediana maximo minimo  desv varianza ferti
##    <chr>         <fct>   <int> <dbl>   <dbl>  <dbl>  <dbl> <dbl>    <dbl> <chr>
##  1 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  2 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  3 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  4 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  5 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  6 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  7 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  8 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
##  9 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
## 10 FI            S          24  5.26    5.29   6.28   3.68 0.558    0.311 FI   
## # ... with 30 more rows, and 2 more variables: plaga <chr>,
## #   media_truncada <dbl>

##Punto 26

library(tidyr)

tic.i %>% drop_na() %>% 
  group_by(Fertilizacion, Estatus) %>% 
  summarise(largo = length(Biomasa),
            media = mean(Biomasa),
            mediana = median(Biomasa),
            maximo = max(Biomasa),
            minimo = min(Biomasa),
            desv_biom = sd(Biomasa),
            varianza = var(Biomasa),
            media_truncada = mean(Biomasa, trim = 0.1)) %>% 
  filter(Estatus == "S")
## `summarise()` has grouped output by 'Fertilizacion'. You can override using the
## `.groups` argument.
## # A tibble: 2 x 10
## # Groups:   Fertilizacion [2]
##   Fertilizacion Estatus largo media mediana maximo minimo desv_biom varianza
##   <chr>         <fct>   <int> <dbl>   <dbl>  <dbl>  <dbl>     <dbl>    <dbl>
## 1 FI            S          19  5.27    5.29   6.28   3.68     0.606    0.368
## 2 FO            S          15  5.33    5.29   7.48   3.66     1.06     1.13 
## # ... with 1 more variable: media_truncada <dbl>

##Punto 27

tic.i %>% filter(Estatus %in% c("PA", "MA"))
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  5.025019       17        9     252  ausente      PA            FO
## 2  6.921230       16       16      57 presente      PA            FO
## 3  4.121795       15        9     251 presente      PA            FI
## 4  4.026518       15       10     299 presente      PA            FO
## 5  5.437274       19        9     191  ausente      MA            FI
## 6  4.735235       16        9      17  ausente      MA            FI
## 7  5.810975       16       11     182 presente      PA            FI
## 8  5.945031       16       13     272 presente      PA            FI
## 9  5.123132       19       13     175 presente      PA            FI
## 10 5.246465       16       10      69 presente      MA            FI
## 11 3.008715       17       10      34 presente      PA            FI
## 12 3.819193       14        6     253 presente      PA            FI
## 13 4.688809       17       10     138 presente      PA            FO
## 14 4.034066       15        9      39 presente      MA            FI
## 15 4.455432       14        9      76  ausente      MA            FI
## 16 5.086390       17       12     157 presente      PA            FI
## 17 5.211317       14       10      28 presente      PA            FI
## 18 5.156747       13        9     227 presente      MA            FI
## 19 5.986789       13       10     247  ausente      MA            FI
## 20 4.967470       16       11     259 presente      MA            FI
## 21 5.844751       17       12      56 presente      PA            FI
## 22 4.407045       15       13      14 presente      MA            FO
## 23 4.733328       13        8     196  ausente      PA            FI
## 24 4.727631       17        9     131 presente      PA            FI
## 25 5.741851       18        8      63 presente      MA            FI
## 26 5.570823       17       15      99 presente      PA            FI
## 27 5.992324       16       12     258 presente      PA            FO
## 28 5.845275       13        9      63 presente      PA            FO
## 29 4.844048       16        7      26 presente      MA            FO
## 30 6.307095       17       10      36 presente      MA            FI
## 31 4.937786       17       13     125 presente      PA            FI
## 32 4.359705       14       14     224 presente      PA            FI
## 33 5.891949       16       15      10  ausente      MA            FO
## 34 3.989777       17        9      20 presente      MA            FO
## 35 5.811167       17       14      12 presente      PA            FI
## 36 6.124436       16       10     172  ausente      MA            FI
## 37 4.576332       17        8      63  ausente      PA            FI
## 38 4.048492       16       12      91 presente      PA            FO
## 39 5.827465       18       11     146  ausente      PA            FO
## 40 5.749866       15       10     192 presente      MA            FI
## 41 4.865976       19       13     219 presente      MA            FI
## 42 5.328616       15       11     230  ausente      MA            FO
## 43 5.872778       15        9      99 presente      PA            FI
## 44 4.360196       15        9     222  ausente      PA            FI
## 45 3.959340       17       12     268  ausente      PA            FI
## 46 3.512971       18       14     221 presente      MA            FO
## 47 4.614101       16       11     129 presente      PA            FI
## 48 4.850791       17        7      19 presente      MA            FO
## 49 5.196912       17        9     183  ausente      MA            FI
## 50 5.770627       14       10     297 presente      PA            FI
## 51 3.457137       15        8     114 presente      PA            FI
## 52 5.370697       17        9      65 presente      PA            FO
## 53 5.551141       16       13     266  ausente      MA            FI
## 54 4.427496       16        9     108 presente      PA            FI
## 55 5.745108       18        8      43 presente      MA            FI
## 56 4.462622       17        4     167  ausente      MA            FI

##Punto 28

tic.i %>% filter(complete.cases(tic.i))
##     Biomasa Flores.r Flores.d Hojas.d    Plaga Estatus Fertilizacion
## 1  4.983138       16       11     285 presente       S            FI
## 2  3.681318       18       11      36 presente       S            FI
## 3  5.025019       17        9     252  ausente      PA            FO
## 4  6.280048       16        7     230 presente       S            FI
## 5  6.112725       16       16      69  ausente       S            FI
## 6  6.921230       16       16      57 presente      PA            FO
## 7  5.357669       19       13     140 presente       S            FI
## 8  4.121795       15        9     251 presente      PA            FI
## 9  6.230549       18       11     213 presente       S            FI
## 10 4.026518       15       10     299 presente      PA            FO
## 11 5.437274       19        9     191  ausente      MA            FI
## 12 4.735235       16        9      17  ausente      MA            FI
## 13 5.810975       16       11     182 presente      PA            FI
## 14 4.381293       13       11      64 presente       S            FO
## 15 5.945031       16       13     272 presente      PA            FI
## 16 5.293377       14       12     258  ausente       S            FO
## 17 5.123132       19       13     175 presente      PA            FI
## 18 4.976547       15       11     238 presente       S            FI
## 19 5.246465       16       10      69 presente      MA            FI
## 20 3.008715       17       10      34 presente      PA            FI
## 21 3.819193       14        6     253 presente      PA            FI
## 22 4.688809       17       10     138 presente      PA            FO
## 23 4.979726       17       12     173 presente       S            FI
## 24 4.034066       15        9      39 presente      MA            FI
## 25 4.455432       14        9      76  ausente      MA            FI
## 26 5.086390       17       12     157 presente      PA            FI
## 27 5.211317       14       10      28 presente      PA            FI
## 28 5.156747       13        9     227 presente      MA            FI
## 29 5.986789       13       10     247  ausente      MA            FI
## 30 4.967470       16       11     259 presente      MA            FI
## 31 5.844751       17       12      56 presente      PA            FI
## 32 5.057106       15       10       2 presente       S            FI
## 33 5.294819       18       11     293 presente       S            FI
## 34 4.988360       16       10      24  ausente       S            FI
## 35 5.278693       12        9     174  ausente       S            FO
## 36 4.407045       15       13      14 presente      MA            FO
## 37 6.385937       17       10     143 presente       S            FO
## 38 4.733328       13        8     196  ausente      PA            FI
## 39 4.727631       17        9     131 presente      PA            FI
## 40 3.658050       15        9     149  ausente       S            FO
## 41 5.741851       18        8      63 presente      MA            FI
## 42 5.570823       17       15      99 presente      PA            FI
## 43 5.306467       17       14     161 presente       S            FI
## 44 4.609088       17       10      49 presente       S            FO
## 45 5.992324       16       12     258 presente      PA            FO
## 46 5.845275       13        9      63 presente      PA            FO
## 47 4.844048       16        7      26 presente      MA            FO
## 48 6.441178       17        7      41 presente       S            FO
## 49 3.882138       16        7     144 presente       S            FO
## 50 5.282284       15        8     256  ausente       S            FI
## 51 6.307095       17       10      36 presente      MA            FI
## 52 4.937786       17       13     125 presente      PA            FI
## 53 4.359705       14       14     224 presente      PA            FI
## 54 5.498807       13       12     296 presente       S            FI
## 55 5.891949       16       15      10  ausente      MA            FO
## 56 4.531162       13        8     152 presente       S            FI
## 57 3.989777       17        9      20 presente      MA            FO
## 58 5.005355       18       14     140 presente       S            FO
## 59 5.811167       17       14      12 presente      PA            FI
## 60 6.124436       16       10     172  ausente      MA            FI
## 61 4.576332       17        8      63  ausente      PA            FI
## 62 4.048492       16       12      91 presente      PA            FO
## 63 6.108589       18       10     162 presente       S            FO
## 64 5.827465       18       11     146  ausente      PA            FO
## 65 5.749866       15       10     192 presente      MA            FI
## 66 4.865976       19       13     219 presente      MA            FI
## 67 5.389719       15       12     291 presente       S            FI
## 68 5.328616       15       11     230  ausente      MA            FO
## 69 5.872778       15        9      99 presente      PA            FI
## 70 4.360196       15        9     222  ausente      PA            FI
## 71 3.959340       17       12     268  ausente      PA            FI
## 72 5.777783       16       11     126 presente       S            FO
## 73 3.512971       18       14     221 presente      MA            FO
## 74 4.614101       16       11     129 presente      PA            FI
## 75 5.828094       15        9      90 presente       S            FI
## 76 4.850791       17        7      19 presente      MA            FO
## 77 5.196912       17        9     183  ausente      MA            FI
## 78 5.770627       14       10     297 presente      PA            FI
## 79 3.457137       15        8     114 presente      PA            FI
## 80 5.347643       18        9      62 presente       S            FI
## 81 5.370697       17        9      65 presente      PA            FO
## 82 6.058621       14       12     292  ausente       S            FO
## 83 5.368891       16        9     141 presente       S            FO
## 84 4.278127       15       14      16  ausente       S            FO
## 85 5.551141       16       13     266  ausente      MA            FI
## 86 4.427496       16        9     108 presente      PA            FI
## 87 5.745108       18        8      43 presente      MA            FI
## 88 4.462622       17        4     167  ausente      MA            FI
## 89 4.918891       15        8      38 presente       S            FI
## 90 7.482596       16       13     106 presente       S            FO

##Punto 29

tic.i %>%  mutate(Flores.r=NULL, Flores.d=NULL)
##     Biomasa Hojas.d    Plaga Estatus Fertilizacion
## 1  4.983138     285 presente       S            FI
## 2  3.681318      36 presente       S            FI
## 3  5.025019     252  ausente      PA            FO
## 4  6.280048     230 presente       S            FI
## 5  6.112725      69  ausente       S            FI
## 6  6.921230      57 presente      PA            FO
## 7  5.357669     140 presente       S            FI
## 8  4.121795     251 presente      PA            FI
## 9  6.230549     213 presente       S            FI
## 10 4.026518     299 presente      PA            FO
## 11 5.437274     191  ausente      MA            FI
## 12 4.735235      17  ausente      MA            FI
## 13 5.810975     182 presente      PA            FI
## 14 4.381293      64 presente       S            FO
## 15 5.945031     272 presente      PA            FI
## 16 5.293377     258  ausente       S            FO
## 17 5.123132     175 presente      PA            FI
## 18 4.976547     238 presente       S            FI
## 19 5.246465      69 presente      MA            FI
## 20 3.008715      34 presente      PA            FI
## 21 3.819193     253 presente      PA            FI
## 22 4.688809     138 presente      PA            FO
## 23 4.979726     173 presente       S            FI
## 24 4.034066      39 presente      MA            FI
## 25 4.455432      76  ausente      MA            FI
## 26 5.086390     157 presente      PA            FI
## 27 5.211317      28 presente      PA            FI
## 28 5.156747     227 presente      MA            FI
## 29 5.986789     247  ausente      MA            FI
## 30 4.967470     259 presente      MA            FI
## 31 5.844751      56 presente      PA            FI
## 32 5.057106       2 presente       S            FI
## 33 5.294819     293 presente       S            FI
## 34 4.988360      24  ausente       S            FI
## 35 5.278693     174  ausente       S            FO
## 36 4.407045      14 presente      MA            FO
## 37 6.385937     143 presente       S            FO
## 38 4.733328     196  ausente      PA            FI
## 39 4.727631     131 presente      PA            FI
## 40 3.658050     149  ausente       S            FO
## 41 5.741851      63 presente      MA            FI
## 42 5.570823      99 presente      PA            FI
## 43 5.306467     161 presente       S            FI
## 44 4.609088      49 presente       S            FO
## 45 5.992324     258 presente      PA            FO
## 46 5.845275      63 presente      PA            FO
## 47 4.844048      26 presente      MA            FO
## 48 6.441178      41 presente       S            FO
## 49 3.882138     144 presente       S            FO
## 50 5.282284     256  ausente       S            FI
## 51 6.307095      36 presente      MA            FI
## 52 4.937786     125 presente      PA            FI
## 53 4.359705     224 presente      PA            FI
## 54 5.498807     296 presente       S            FI
## 55 5.891949      10  ausente      MA            FO
## 56 4.531162     152 presente       S            FI
## 57 3.989777      20 presente      MA            FO
## 58 5.005355     140 presente       S            FO
## 59 5.811167      12 presente      PA            FI
## 60 6.124436     172  ausente      MA            FI
## 61 4.576332      63  ausente      PA            FI
## 62 4.048492      91 presente      PA            FO
## 63 6.108589     162 presente       S            FO
## 64 5.827465     146  ausente      PA            FO
## 65 5.749866     192 presente      MA            FI
## 66 4.865976     219 presente      MA            FI
## 67 5.389719     291 presente       S            FI
## 68 5.328616     230  ausente      MA            FO
## 69 5.872778      99 presente      PA            FI
## 70 4.360196     222  ausente      PA            FI
## 71 3.959340     268  ausente      PA            FI
## 72 5.777783     126 presente       S            FO
## 73 3.512971     221 presente      MA            FO
## 74 4.614101     129 presente      PA            FI
## 75 5.828094      90 presente       S            FI
## 76 4.850791      19 presente      MA            FO
## 77 5.196912     183  ausente      MA            FI
## 78 5.770627     297 presente      PA            FI
## 79 3.457137     114 presente      PA            FI
## 80 5.347643      62 presente       S            FI
## 81 5.370697      65 presente      PA            FO
## 82 6.058621     292  ausente       S            FO
## 83 5.368891     141 presente       S            FO
## 84 4.278127      16  ausente       S            FO
## 85 5.551141     266  ausente      MA            FI
## 86 4.427496     108 presente      PA            FI
## 87 5.745108      43 presente      MA            FI
## 88 4.462622     167  ausente      MA            FI
## 89 4.918891      38 presente       S            FI
## 90 7.482596     106 presente       S            FO

##Punto 30

Sel = tib.c%>% select(contains(".d")) %>% select(everything(c("Flores", "Hojas")))
Sel
##     Flores.d Hojas.d
## 1         10     297
## 2          9     174
## 3          8      43
## 4          5     260
## 5         14      90
## 6          8      63
## 7         11     126
## 8         13       3
## 9         13      35
## 10        11     182
## 11        13     272
## 12        10     166
## 13         9      62
## 14        10      22
## 15        10      36
## 16         8      35
## 17         8      63
## 18        10     172
## 19        12     258
## 20        13     219
## 21        11     150
## 22         9      20
## 23        10      34
## 24        11     259
## 25         9     251
## 26        11     146
## 27        11     284
## 28         8      46
## 29         9      76
## 30         9     141
## 31         9     108
## 32         9      90
## 33        13      14
## 34         9      99
## 35         7      19
## 36        11     129
## 37        12     292
## 38        13     266
## 39         9     163
## 40        10      24
## 41         8     256
## 42        10     299
## 43         9     149
## 44         8      38
## 45        15      99
## 46        11     272
## 47        11     285
## 48        12     268
## 49        14      16
## 50        12     296
## 51         9     227
## 52         8     163
## 53         9      17
## 54         9     183
## 55         4     167
## 56        13     140
## 57         8     294
## 58        11     257
## 59        11     261
## 60        14     161
## 61        10       2
## 62         9     191
## 63         7      26
## 64         9     222
## 65         6     225
## 66        10     171
## 67        12     291
## 68        13     106
## 69        14      12
## 70        10     192
## 71         8     165
## 72        12     157
## 73        13     125
## 74        10     247
## 75        13     175
## 76        11     238
## 77         8      14
## 78        14     175
## 79        10      28
## 80        12     258
## 81        11      64
## 82         7      41
## 83         8     152
## 84        12      56
## 85        11     181
## 86        14     224
## 87         7     126
## 88        14     140
## 89        10     143
## 90         8      60
## 91        13      98
## 92         9     108
## 93        10     162
## 94         6     253
## 95        12      91
## 96         8     231
## 97        11      36
## 98        11     293
## 99        10     138
## 100        7     144
## 101       15      10
## 102        7     230
## 103       16      69
## 104        9      39
## 105        9     131
## 106       15     105
## 107        9      65
## 108       14     221
## 109       12     173
## 110        8     114
## 111        9     252
## 112        9      63
## 113       11     230
## 114       17      51
## 115       10      69
## 116       11     213
## 117       10      49
## 118       16      57
## 119       14     218
## 120        8     196