1. Crea la siguiente tabla:
Group Rows
Plant Treatment conc uptake
Quebec
1 Qn1 nonchilled 95 16.0
2 Qn1 nonchilled 175 30.4
3 Qn1 nonchilled 250 34.8
Mississippi
43 Mn1 nonchilled 95 10.6
44 Mn1 nonchilled 175 19.2
45 Mn1 nonchilled 250 26.2
46 Mn1 nonchilled 350 30.0
  1. Crea la siguiente tabla (bonus)

Esta tabla tiene algunas características que no se han visto en el curso. Los datos pertenecen a las 10 primeras filas del dataset mtcars. En particular deberás conseguir que cuando la variable mpg es menor que 20 se pinte de rojo y cuando es mayor de azul. Para conseguir esto, tendrás que especificarlo al dataset antes de utilizar la función kable por medio de cell_spec.

*Algunas ayudas:

ifelse(mpg > 20, "red", "blue")

escape = F

mpg cyl
21 6
21 6
22.8 4
21.4 6
18.7 8
18.1 6
14.3 8
24.4 4
22.8 4
19.2 6

Genera un .html, no un .pdf.