Avaliação semanal da severidade (% de lesão no limbo foliar por meio de escala) da ferrugem (Tranzschelia discolor) em folhas de pessegueiro (Prunus persica). Foram marcados 2 ramos por árvore (em lados opostos na planta) contendo 10 folhas marcadas em cada um. Foram testadas também 7 doses de nitrogênio em combinação com tratamentos de poda. O delineamento foi de blocos casualizados e o ensaio foi repetido em 3 safras no mesmo pomar. As plantas foram as mesmas nas 3 safras, no entanto, os ramos foram diferentes.

Format

Um data.frame com 30240 linhas e 8 colunas, em que

safra

Fator categórico que representa cada uma das 3 safras nas quais o experimento foi conduzido.

dia

Dia de avaliação. Foi do dia 0 ao dia 84, com intervalos de 7 dias, perfazento um total de 12 níveis.

folha

Folhas marcadas em 2 ramos por árvore (em lados opostos). As foram eram observadas a cada 7 dias, portanto, os registros em uma folha são no máximo 12 de forma longitudinal. A indentificação das folhas é única.

nitro

Nitrogênio aplicado em 7 doses (0, 40, 80, 120, 160, 200, 240 kg ha\(^{-1}\).

lado

Fator que representa o lado da planta no qual estava o ramo, sendo que 1 = sul e 2 = norte.

poda

Números de poda aplicado nas plantas, sedo que 1 = 1 poda e 2 = 4 podas.

bloco

Fator categórico que representa os blocos do experimento.

sever

Severidade medida ao longo do tempo em cada uma das folhas, em porcentagem de área com lesão de acordo com a escala diagramática adotada. Depois que a folha cai do ramo, não há como determinar a severidade, então os valores perdidos para as datas porteriores a queda da folha são representados com NA.

Source

Dolinski, M. A. (http://lattes.cnpq.br/5554247933578584), May De Mio, L. L. (http://lattes.cnpq.br/5306520242222948). Universidade Federal do Paraná, SCA, Laboratório de Epidemiologia para Manejo Integrado de Doenças em plantas (LEMID).

Examples

data(rust_peach) str(rust_peach)
#> 'data.frame': 30240 obs. of 8 variables: #> $ safra: Factor w/ 3 levels "1","2","3": 1 1 1 1 1 1 1 1 1 1 ... #> $ dia : int 0 14 21 28 35 42 49 56 63 70 ... #> $ folha: Factor w/ 2520 levels "1","2","3","4",..: 1 1 1 1 1 1 1 1 1 1 ... #> $ nitro: int 0 0 0 0 0 0 0 0 0 0 ... #> $ lado : int 1 1 1 1 1 1 1 1 1 1 ... #> $ poda : int 1 1 1 1 1 1 1 1 1 1 ... #> $ bloco: Factor w/ 3 levels "I","II","III": 1 1 1 1 1 1 1 1 1 1 ... #> $ sever: num 0 0 0.05 0.1 0.9 0.35 NA NA NA NA ...
# Combinações entre poda x nitrogênio em cada safra. ftable(xtabs(~safra + poda + nitro, data = rust_peach))
#> nitro 0 40 80 120 160 200 240 #> safra poda #> 1 1 720 720 720 720 720 720 720 #> 2 720 720 720 720 720 720 720 #> 2 1 720 720 720 720 720 720 720 #> 2 720 720 720 720 720 720 720 #> 3 1 720 720 720 720 720 720 720 #> 2 720 720 720 720 720 720 720
# Combinações entre bloco x dia em cada safra. ftable(xtabs(~safra + bloco + dia, data = rust_peach))
#> dia 0 14 21 28 35 42 49 56 63 70 77 84 #> safra bloco #> 1 I 280 280 280 280 280 280 280 280 280 280 280 280 #> II 280 280 280 280 280 280 280 280 280 280 280 280 #> III 280 280 280 280 280 280 280 280 280 280 280 280 #> 2 I 280 280 280 280 280 280 280 280 280 280 280 280 #> II 280 280 280 280 280 280 280 280 280 280 280 280 #> III 280 280 280 280 280 280 280 280 280 280 280 280 #> 3 I 280 280 280 280 280 280 280 280 280 280 280 280 #> II 280 280 280 280 280 280 280 280 280 280 280 280 #> III 280 280 280 280 280 280 280 280 280 280 280 280
library(lattice) library(latticeExtra) # Ver resultados da safra 1. useOuterStrips( xyplot(sever ~ dia | nitro + bloco, groups = poda, data = subset(rust_peach, safra == "1"), type = c("p", "smooth"), xlab = "Dia de avaliação", ylab = "Severidade (%)"))
xyplot(sever ~ dia | folha, type = "l", data = subset(rust_peach, safra == "1" & bloco == "I" & nitro == 0 & poda == 1 & lado == 1), xlab = "Dia de avaliação", ylab = "Severidade (%)")
# As 10 folhas de um ramo. subset(rust_peach, safra == "1" & bloco == "I" & nitro == 0 & poda == 1 & lado == 1)
#> safra dia folha nitro lado poda bloco sever #> 1 1 0 1 0 1 1 I 0.00 #> 2 1 14 1 0 1 1 I 0.00 #> 3 1 21 1 0 1 1 I 0.05 #> 4 1 28 1 0 1 1 I 0.10 #> 5 1 35 1 0 1 1 I 0.90 #> 6 1 42 1 0 1 1 I 0.35 #> 7 1 49 1 0 1 1 I NA #> 8 1 56 1 0 1 1 I NA #> 9 1 63 1 0 1 1 I NA #> 10 1 70 1 0 1 1 I NA #> 11 1 77 1 0 1 1 I NA #> 12 1 84 1 0 1 1 I NA #> 13 1 0 2 0 1 1 I 0.00 #> 14 1 14 2 0 1 1 I 0.02 #> 15 1 21 2 0 1 1 I 0.04 #> 16 1 28 2 0 1 1 I 0.09 #> 17 1 35 2 0 1 1 I 0.30 #> 18 1 42 2 0 1 1 I 0.30 #> 19 1 49 2 0 1 1 I NA #> 20 1 56 2 0 1 1 I NA #> 21 1 63 2 0 1 1 I NA #> 22 1 70 2 0 1 1 I NA #> 23 1 77 2 0 1 1 I NA #> 24 1 84 2 0 1 1 I NA #> 25 1 0 3 0 1 1 I 0.00 #> 26 1 14 3 0 1 1 I 0.00 #> 27 1 21 3 0 1 1 I 0.00 #> 28 1 28 3 0 1 1 I 0.00 #> 29 1 35 3 0 1 1 I 0.28 #> 30 1 42 3 0 1 1 I 0.20 #> 31 1 49 3 0 1 1 I NA #> 32 1 56 3 0 1 1 I NA #> 33 1 63 3 0 1 1 I NA #> 34 1 70 3 0 1 1 I NA #> 35 1 77 3 0 1 1 I NA #> 36 1 84 3 0 1 1 I NA #> 37 1 0 4 0 1 1 I 0.00 #> 38 1 14 4 0 1 1 I 0.04 #> 39 1 21 4 0 1 1 I 0.01 #> 40 1 28 4 0 1 1 I 0.09 #> 41 1 35 4 0 1 1 I 0.18 #> 42 1 42 4 0 1 1 I 0.19 #> 43 1 49 4 0 1 1 I NA #> 44 1 56 4 0 1 1 I NA #> 45 1 63 4 0 1 1 I NA #> 46 1 70 4 0 1 1 I NA #> 47 1 77 4 0 1 1 I NA #> 48 1 84 4 0 1 1 I NA #> 49 1 0 5 0 1 1 I 0.00 #> 50 1 14 5 0 1 1 I 0.00 #> 51 1 21 5 0 1 1 I 0.00 #> 52 1 28 5 0 1 1 I 0.00 #> 53 1 35 5 0 1 1 I 0.00 #> 54 1 42 5 0 1 1 I 0.00 #> 55 1 49 5 0 1 1 I 0.00 #> 56 1 56 5 0 1 1 I 0.00 #> 57 1 63 5 0 1 1 I 0.07 #> 58 1 70 5 0 1 1 I 0.20 #> 59 1 77 5 0 1 1 I 0.30 #> 60 1 84 5 0 1 1 I 1.80 #> 61 1 0 6 0 1 1 I 0.00 #> 62 1 14 6 0 1 1 I 0.00 #> 63 1 21 6 0 1 1 I 0.05 #> 64 1 28 6 0 1 1 I 0.06 #> 65 1 35 6 0 1 1 I 0.90 #> 66 1 42 6 0 1 1 I 0.30 #> 67 1 49 6 0 1 1 I 0.40 #> 68 1 56 6 0 1 1 I 0.30 #> 69 1 63 6 0 1 1 I NA #> 70 1 70 6 0 1 1 I NA #> 71 1 77 6 0 1 1 I NA #> 72 1 84 6 0 1 1 I NA #> 73 1 0 7 0 1 1 I 0.00 #> 74 1 14 7 0 1 1 I 0.00 #> 75 1 21 7 0 1 1 I 0.00 #> 76 1 28 7 0 1 1 I 0.00 #> 77 1 35 7 0 1 1 I 0.07 #> 78 1 42 7 0 1 1 I 0.30 #> 79 1 49 7 0 1 1 I 0.20 #> 80 1 56 7 0 1 1 I 0.30 #> 81 1 63 7 0 1 1 I 0.50 #> 82 1 70 7 0 1 1 I 0.30 #> 83 1 77 7 0 1 1 I 0.50 #> 84 1 84 7 0 1 1 I 2.50 #> 85 1 0 8 0 1 1 I 0.00 #> 86 1 14 8 0 1 1 I 0.00 #> 87 1 21 8 0 1 1 I 0.00 #> 88 1 28 8 0 1 1 I 0.00 #> 89 1 35 8 0 1 1 I 0.30 #> 90 1 42 8 0 1 1 I 0.28 #> 91 1 49 8 0 1 1 I 0.40 #> 92 1 56 8 0 1 1 I NA #> 93 1 63 8 0 1 1 I NA #> 94 1 70 8 0 1 1 I NA #> 95 1 77 8 0 1 1 I NA #> 96 1 84 8 0 1 1 I NA #> 97 1 0 9 0 1 1 I 0.00 #> 98 1 14 9 0 1 1 I 0.00 #> 99 1 21 9 0 1 1 I 0.00 #> 100 1 28 9 0 1 1 I 0.06 #> 101 1 35 9 0 1 1 I 1.10 #> 102 1 42 9 0 1 1 I 0.60 #> 103 1 49 9 0 1 1 I 0.70 #> 104 1 56 9 0 1 1 I 3.00 #> 105 1 63 9 0 1 1 I 3.00 #> 106 1 70 9 0 1 1 I NA #> 107 1 77 9 0 1 1 I NA #> 108 1 84 9 0 1 1 I NA #> 109 1 0 10 0 1 1 I 0.00 #> 110 1 14 10 0 1 1 I 0.00 #> 111 1 21 10 0 1 1 I 0.02 #> 112 1 28 10 0 1 1 I 0.40 #> 113 1 35 10 0 1 1 I 0.90 #> 114 1 42 10 0 1 1 I 0.80 #> 115 1 49 10 0 1 1 I 1.80 #> 116 1 56 10 0 1 1 I NA #> 117 1 63 10 0 1 1 I NA #> 118 1 70 10 0 1 1 I NA #> 119 1 77 10 0 1 1 I NA #> 120 1 84 10 0 1 1 I NA